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Mountain  Computer 
|i  put  it  all  together 
4^^    for  YOU- 


The  CPS  MultiFunction  Card 


Three  cards  in  one!  The  Mountain  Computer  CPS  MultiFunction  Card  provides  all  the  capabilities  of  a  serial  interface,  parallel 
output  interface  and  real-time  clock/calendar— all  on  one  card— occupying  only  one  slot  in  your  Apple  ll'°'.  Serial  and  Parallel 
output  may  be  used  simultaneously  from  CPS.  CPS  is  configured  from  a  set-up  program  on  diskette  which  sets  the  parameters 
such  as  baud  rate,  etc.  for  all  functions  contained  on  the  card  and  is  stored  in  CMOS  RAM  on  the  card.  Once  you  have 
configured  your  card,  you  need  never  set  it  up  again.  You  may  also  change  parameters  from  the  keyboard  with  control 
commands.  All  function  set-ups  stored  on-board  are  battery  powered  for  up  to  two  years,  "Phantom  slot"  capability  permits 
assigning  each  of  the  functions  of  CPS  to  different  slots  in  your  Apple  without  the  card  actually  being  in  those  slots!  For 
example,  insert  CPS  in  slot  #4  and  set  it  up  so  that  is  simulates  a  parallel  interface  in  slot  #1  and  a  clock  in  slot  #7  and  leave  the 
serial  port  assigned  to  slot  #4.  CPS's  on-board  intelligence  lets  it  function  in  a  wide  variety  of  configurations,  thereby  providing 
software  compatibility  with  most  existing  programs.  "We've  put  it  all  together  for  you"— for  these  reasons  and  many  more! 
Drop  by  your  Apple  dealer  and  see  for  yourself  how  our  CPS  l^ultiFunctipn  Card  can  expand  tf)e  capabilities  of  your  Apple  and 
save  you  a  great  deal  of  money  as  well!  1  .    .       |    [    r • — — —;    ■       i   '-'—~ — •-'    ■    |    [  "j    ~~1 — -■---' 
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Calendar/Clock 

•  One  second  to  99  years 

•  Battery  backed-up  2  years 

•  Two  AA  standard  alkaline  batteries 
for  back-up  provided 

•  Compatible  with  MCI  Apple 
Clock'"  time  access  programs 
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Parallel  Output 

•  Features  auto-line  feed,  Apple 
tabbing,  line  length,  delay  after 
carriage  return,  lower  to  upper 
case  conversion 

•  Centronics  standard— 
reconfigurable  to  other  standards 

•  Status  bit  handshaking 
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»  Mountain  Computer 

^g  incorpohated"!   I    I    I  j 


300  El  Pueblo     Scoffs  Valley,  CA  95066 
.408  438-6650         TWX;  910  598-4504 

'"Apple  Clock  was  the  trademark  of  Moiinlain  Computer  Inc 


Serial  Interface 

•  Features  auto-line  feed,  trans- 
parent terminal  mode.  Apple 
tabbing,  line  length,  delay  after     _ 
carriage  return,  local  echo  of 
output  characters,  simultaneous 
serial/parallel  output,  lower  to 
upper  case  conversion,  discarding 
of  extraneous  LPs  from  serial  input 

•  Uses  the  powerful  2651  serial 
PCI  chip 

•  16  selectable  internal  baud  rates — 
50to19.2Kbaud 

•  Half/Full  duplex  terminal  operation 

•  I/O  interface  conforms  to  RS-232C 

•  Asynchronous/Synchronous       -r- 
operation 


"Apple  and  Apple  II  are  registered  Ir.iden^arhs  of  Apple  Computer  Inc. 
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IF  YOU'RE  WAITING  FOR  THE 

PRICE  OF  WORD  PROCESSORS 

TO  FALL  WITHIN  REASON, 


Everyone  expected  it  would  happen 
sooner  or  later. .  .with  WordPro  PLUS" 
it  already  lias!  Now  all  the  rnarvelous 
benefits  of  expensive  and  advanced 
word  processing  systems  are  available 
on  Commodore  computers.  America's 
largest  selling  computer  line,  WordPro 
PLUS,  when  combined  with  the  new  80 
column  CBM  8032,  creates  a  word  pro- 
cessing system  comparable  to  virtually 
any  other  top  quality  word  processor 
available— but  at  savings  of  thousands 
of  dollarsf 


New,  low  cost  computer  technology  is 
now  available  at  a  fraction  of  what  you 
would  expect  to  pay,  This  technology 
allowed  Commodore  to  introduce  the 
new  and  revolutionary  CBM  8032 
Computer. 

WordPro  PLUS  turns  this  new  CBM 
8032  Computer  into  a  sophisticated, 
time  saving  word  processing  tool.  With 
WordPro  PLUS,  documents  are  dis- 
played on  the  computer's  screen.  Edit- 
ing and  last  minute  revisions  are  simple 
and  easy.  No  more  lengthy  re-typing 
sessions.  Letters  and  documents  are 
easily  re-called  from  memory  storage 
for  editing  or  printing  with  final  drafts 
printed  perfectly  at  over  five  hundred 
words  per  minute! 


Our  nationwide  team  of  professional 
dealers  will  show  you  how  your  office 
will  benefit  by  using  WordPro  PLUS.  At 
a  price  far  less  than  you  realize. 


Invest  in  your  office's  future. . . 
Invest  in  WordPro  PLUS. . . 
Call  us  today  for  the  name  of  the 
WordPro  PLUS  dealer  nearest  you. 

Professional  Software  Inc. 

166  Crescent  Road 
Needham,  MA  02194 
(617)444-5224 
TELEX:  95  1579 
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Turn  your  Apple  into  the  world's 
most  versatile  personal  computer. 


The  SoftCard™  Solution.  SoftCard 
turns  your  Apple  into  two  computers. 
A  Z-80  and  a  6502.  By  adding  a  Z-80 
microprocessor  and  CP/M  to  your 
Apple,  SoftCard  turns  your  Apple  into 
a  CP/M  based  machine.  That  means 
you  can  access  the  single  largest  body 
of  microcomputer  software  in  exist- 
ence. Two  computers  in  one.  And,  the 
advantages  of  both. 
Plug  and  go.  The  SoftCard  system 
starts  with  a  Z-80  based  circuit  card. 
Just  plug  it  into  any  slot  (except  0)  of 
your  Apple.  No  modifications  required. 
SoftCard  supports  most  of  your  Apple 
peripherals,  and,  in  6502-mode,  your 
Apple  is  still  your  Apple. 

CP/M  for  your  Apple.  You  get  CP/M 
on  disk  with  the  SoftCard  package.  It's 
a  powerful  and  simple-to-use  operating 
system.  It  supports  more  software 
tfian  any  other  microcomputer  operat- 
ing system.  And  that's  the  key  to  the 
versatility  of  the  SoftCard/Apple. 


BASIC  included.  A  powerful  tool, 
BASIC-80  is  included  in  the  SoftCard 
package,  Running  under  CP/M,  ANSI 
Standard  BASIC-80  is  the  most 
powerful  microcomputer  BASIC 
available.  It  includes  extensive  disk  I/O 
statements,  error  trapping,  integer 
variables,  16-digit  precision,  exten- 
sive EDIT  commands  and  string  tunc- 
tions,  high  and  low-res  Apple  graphics, 
PRINT  USING,  CHAIN  and  COM- 
MON, plus  many  additional  com- 
mands. And,  it's  a  BASIC  you  can 
compile  with  Microsott's  BASIC 
Compiler. 

More  languages.  With  SoftCard  and 
CP/M,  you  can  add  Microsoft's  ANSI 
Standard  COBOL,  and  FORTRAN,  or 


Basic  Compiler  and  Assembly  Lan- 
guage Development  System,  All,  more 
powerful  tools  for  your  Apple. 
Seeing  is  believing.  See  the  SoftCard 
in  operation  at  your  Microsoft  or  Apple 
dealer  We  think  you'll  agree  that  the 
SoftCard  turns  your  Apple  into  the 
world's  most  versatile  personal 
computer 

Complete  information?  It's  at  your 
dealer's  now.  Or,  we'll  send  it  to  you 
and  include  a  dealer  list.  Write  us.  Call 
us. 

SoftCard  is  a  trademark  of  Microsolt.  Apple  II  and 
Apple  II  Plus  are  registered  tracjomarks  of  Apple 
Computer  Z  80  is  a  registered  trademark  of  Zilog. 
Inc.  CP/M  IS  a  registered  trademark  of  Digital 
Research,  Inc. 


CONSUMER^  PRODUCTS 


Microsoft  Consunner  Products,  400  lOSttn  Ave.  N.E., 
Bellevue.  WA  98004,  (206)  454-1315 
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The  West  Coast  Computer  Faire  was  exceptional. 
A  real  joy.  Do  you  realize  how  fast  this  industry  of 
ours  is  growing?  And  I  mean  growing  in  terms  of 
more  people  becoming  interested  in  what  we've 
been  doing  for  the  past  few  months  or  years,  as 
well  as  growing  in  breadth.  Here's  a  sample; 

It  Talks  Back 
...And  Well 

Votrax  (500  Stephenson  Highway,  Troy,  MI 
48084,  (313)  588-0341)  showed  off  their  "Type-'N- 
Talk""  a  text  to  speech  synthesizer  that  produces 
quite  recognizable  speech.  You  interface  "Type-'N- 
Talk'""  through  an  RS-232C  interface,  type  English 
text  with  a  talk  command,  and  your  computer  talks 
back  to  you. 

Now  you  should  understand  thai:  this  isn't  a 
speech  recognition  device.  It's  a  spee<:h  output 
device.  It  more  than  adequately  const  ructs  verbal 
strings  of  text  from  your  keyed  input  in  programs. 
It's  just  that  you  can't  talk  back  to  it.  The  company 
expects  to  have  production  quantities  available  in 
June.  Suggested  retail  price  is  $345.00.  Watch  for  a 
full  review  by  Susan  Semancik  and  otu"  Delmarva 
Computer  Club  group  in  an  upcoming  Micros  With 
The  Handicapped  column. 

A  second  interesting  product  at  the  show  was 
the  Osborne  I ,  a  (Z-80)  based  portable  computer 
utilizing  industry  standard  technology  in  a  clever 
fasliion.  Designed  as  a  portable,  hand  carriable 
unit,  it  meets  its  specs.  Primary  attractions,  beyond 
that,  are  its  price  and  some  innovativ  e  software 
bundling.  At  a  $1795  retail  price,  the  Osborne  1 
has  these  features: 

-64K.Z80A 

-  Standard  Business  Keyboard 

-  A  5"  CRT  with  CLEAR  resolution 

-  Serial  and  IEEE  488  interfaces 

-  Dual  "lOOK"  minifloppies 

-  Weatherproof  carrying  case 

The  interesting  break  is  the  software  bundling  — 
the  $1795  price  includes: 

-  Wordstar  word  processing  with  Mailmeye 
option 


-  The  CP/M  disk  operating  system 

-  CBASIC  and  MBASIC  languages 

-  The  Supercalc  electronic  calculator 
Additional  hardware  options  will  be  offered.  I 
think  if  you're  on  the  market  for  such  a  machine, 
this'll  be  a  good  place  to  start  looking.  ,\s  always, 
not  the  only  place,  but  the  concept  of  Ijundling  of 
software  is  certaitily  attractive. 

Introducing  "Super-PET" 

Commodore  has  made  what  appears  to  be  a  break- 
through of  major  significance  for  the  industry. 
The  machine's  true  name  is  unknown  at  press 
time.  It  has  been  variously  called;  the  "Mini-Frame", 
the  "Micro  Mini-Frame",  the  "Mini  Main-Frame", 
and  the  "Micro  Main-Frame".  (We  would  have  been 
happy  to  spo7isor  a  "Name  the  Super-PET"  contest.) 

We  received  much  of  this  information  in  a 
March  3  interview,  but  held  off  becau.se  of  on-going 
"delicate  negotiations".  These  apparently  over, 
"Super-PF.T"  was  introduced  at  the  Hanover  Faire 
in  Germany  during  the  first  week  of  April. 

How  super  is  it?  Here  are  the  specifications: 

-  134K  Mixed  RAM  and  ROM  allocated  as 

follows: 

-  18K  ROM  Operating  System  for  the  6502 
processor 

-  18K  ROM  Operating  System  for  the  6809 
processor 

-  2K  Screen  RAM 

-  32K  "normal"  CBM  8032  RAM 

-  64K  Bank  Switched  RAM  operating  as 
virtual  memory. 

1    RS-232C  fully  program malile  serial  port 
1    High-s|>eed  serial  communicalions  ptjrl  for 
networking  at  20DKB 

-  Languages: 

-  Waterloo  Extended  BASIC. 

Some  of  the  highlights  of  this  BASIC:  include 
unlimited  length  strings,  name  called  subroutines 
with  parameter  passing,  local  and  glolial  variables, 
program  chaining,  and  total  variable  preservation. 
(Meaning  you  can  correct  some  types  ot  errors  m  a 
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Atari  graphics  and  sound  stand  in 
a  class  by  themselves  " 

David  D.  Thornburg 

Compute  Magazine,  November/December 

1980 


"Tlie  Atari  machine  is  the  most  extraordi- 
nary computer  graphics  box  ever  made.. !' 

Ted  Nelson 

Creative  Computing  Magazine,  June  1980 


"Its  superiority  lies  in  three  areas:  draw- 
ing fancy  pictures  (in  color),  playing 
music,  and  printing  English  characters 
onto  the  screen.  Tliough  the  Apple  can 

do  all  these  things,         | 

Atari  does  them  better." 


Russell  Walter 
"Underground 
Gidde  to  Buying  a 
Computer" 
Published  1980, 
SCELBI  Publications 


iQ  areas:  draw-  ". . .so  well  packaged  that  it  is  the  first  per- 

)r),  playing  sonal  computer  I've  used  that  I'm  willing 

5h  characters  to  set  up  in  the  living  room." 

he  Apple  can  Ken  Skier,  OnComputing,  Inc.  Summer  1980 


...well  constructed, 

sleekly  designed  and 

user-friendly — expect 

What  computer  people       reliable  equipment, 

are  ^avin?  ahanf  ^^^  ^^^^'^^  maintenance 

are  !»aying  aOOUl     ^       and  software  support. 

Computers  for  people,     vtdeopiay 

December,  1980 


To  find  out  about  the  ATARI®  800™  Computer 

fir.st  hand,  a.sk  your  local  computer  dealer 

for  a  hand.s-on  demonstration. 

Or  call,  800-538-8547  (In  California  800-672-1404) 


IIHHmUIHmmUniml  n»u\m\\\m\\\\\\\w\\  ■\ 
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ATARI 


Comiiiiters  for  people: 

For  further  information  write:  Atari  Inc.,  Computer  Division,  1196  Borregas  Avenue,  Sunnwale,  CA  94086 
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by  Pflijl  Ll«u,s 

APPLE  WORLD  lutns  yoiif  Apple  pnlo  a  spphist'Caletl 
gtaphics  svslijm  capAbli^  ot  crpalmg  animated 
iriree-dimei^sional  color  inagps.  profeclmg  inem  m 
Irue  perspective  on  the  screen,  rotate  inenr.  mone 
tnem  closer  further  away  snrj  many  attter  exgttirg  arid 
imaginative  things 

Draws  obiecis  with  6S  000  points  per  side 

A  povrerfut  screen-oriented  leirl  editor  isinctuded  to 
facilitate  image  tomalion   Tnu  program  wiv^  rer^entty 
featured  on  Tom  Snyder  i  pfime  Time  Saturday  TV 
Snow  and  is  now  available  for  sale 

APPLE  IMORLD  £  powertul  ediTEtr  iK  so  easy  to  us^  That 
chiicjrenwiii  love  it  You  can  now   shetcfi   your  dream 
f^ouie,  boat,  cat,  o'famasi-  empire  Then  view  it  as  it 
would  D«  seen  from  toOOOleetof  yoocan  ZOO.M  m 
until  liie  screen  IS  filled  wiTh  a  doorknob  vou  could 

then  go  insidn  and  move  *fOm  rOOm  to  rOOm 
examining  furniture  placi'ment  a?  your  screen  rotates 
wjfhin  the  room   tmages  or  sfwcific  parts  of  images 
can  easily  be  saved  to  disfc  or  printer 

Does  all  this  sound  like  science  tiction^ 

Yco  won  t  think  so  alter  yau  have  visited  Apple  World. 

INTRODUCTORY  PRICE  S59.95 
For  48K  Apple  II  Or  Plus  with  Disk 


M 
^ 

M 

^Supergraphics 

^Bt    4  3-0  GAMfc  DEVELOPMENT  SYSTEM  IN  COLOR 
V  ~~  D>'  P^x*  Lulus 

fc  Waich  colorlul  bullerllys.  bicds.  iiy  across  your  Apple 

^m^   J F  Atari  screenwilhlrueSdimensionafperspeclive 
■^^^  Have  rocket  shipsflyoul  ai  you  in  (hiis  incredible  high 

f^  ^peed  graphics  package  3-D  SUPERGRAPHICS"  is 
a  6502  rnacHifif  language  progj'am  ina(  will 

k  nteitacfl  1o  your  Qasic  or  machmo  language 

^^■rf^   prograrns  or  games  uSiny  simple  'DOS- like'  comrr>and*. 

f  f  valurpi  ificJude^ 

•  Simpte  iniiige  entry  Ihrough  ediiOf 

k  •  ObiecTs  ijp  lo  256  points  per  stdE 

^Jl^    "  Uses  ait  hi-rcs  colors 
^^P^  ■  Allows  mtxed  colored  IpkI  &  grapfiics 

r  fO'  promnls  and  captions 

■  Translates  on  3  aies 

k^  •  incjK-idjai  anjs  scales 
,^MW   •  2'5  diKeicnl  commands 
■^P^*  Rotate  obiect  t  4-  lo  360' 

r  pncromcriis  at  machifn?  speeds 

FOR  48K  APPLE  II  OR  PLUS  WITH 
DISK  II  S39.95  FOR  DISK 

FOR  ATARI  600  WITH  40K  MEMORY 
(DISK  OPTIONAL) 

S39.95  FOR  TAPE 


^  ^  OTHER  SOFTWARE 

^^  APPLE  COMPUTERS 

Super  Space  Wars  S  9  M 

k  States  &  Cappiais        .         9  95 

^m^      Moving  Pohfii 

'^V^          Anerag^      .  1:995 

'            Stock  Options 24  95 

finance t2;Sft 

fc^       aon^s 12  95 

"^P^  COMMODORE  PET 

T  Stock  Options 2J  95 

F<nafice t2  95 

k^       Bonds     12  95 

.^K^      Stock  /KnAt-itti ii^ 

r  Space  iriiiudeis  ("Besr 

Gameol  19791 19  95 

L^      Jiji-yHoalago 9  95 

,^^W       Hentiicky  Derfiy' 

"^B^        Roulette 9  95 

r              Alien  I  0,'Tank  9  95 

Submarine  Atlact  9  95 

k^      8g|iic  ol  Midway     ...  7  95 

_^mr        Laser  Tank  Battle  ...  9.95 

^^P^      Swarm _ I J  95 

r              Base&aU 9  95 

Super  Starirek t4  95 

It^       PET  Music  Ooji        .    .  29  95 
_^^W        Music  Composilion  Syslem     . 

"^^  1995 

r  Pearl  Harbor  Adventuj-e 

-..-. , 1195 

Super  Gomoku 9  95 
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COMPUTE! 


Relational  Query  System  For  Management 


DATABASES:  You've  Heard  The  Hype  Before... 
The  Truth  IS... REQUEST  DELIVERS! 


DATABASE  MAINTENANCE  — 

•  Uses  sophisticated  screen  formatting  &  data 
entry,  like  on  IBM  3270's! 

•  Generates  it's  own  screens  automatically! 

•  Handles  records  up  lo  4K  in  iengtti,  using 
multiple  screen  "Pages"! 

•  Automatic  data  compression  for  increased 
disk  capacity 

•  Uses  Superkram  (See  belowl  access  mettiod 
for  incredibly  fast  access,  LESS  THAN  ,2 
SECONDS  FOR  A  RECORD! 

•  Automatic  index  creation/maintenance 

•  Automatic  maintenance  capabilities 

•  "Goof-Proof"  error  handling 

•  Input  can  come  from  VISICALC"  or 
SOURCE" 


DATABASE  SELECTION— 

•  Uses  screen  masks  to  form  query 

•  Provides  extensive  search  capabilities 

•  Search  arguments  can  include 
arittimettc/boolean  functions,  multi-field 
comparisons 

•  Queries  can  generate  input  for  automatic 
database  maintenance 

•  Queries  can  be  stored  in  "Query  Library"  and 
executed  from  menu  on  demand 

•  Any  number  of  fields  can  be  queried 
concurrently 

•  Query  output  can  be  routed  to  disk,  CRT 
report  formatter,  VISICALC"  or  SOURCE'" 

ONLY  $225 


DATABASE  REPORTING— 

•  Automatic  headlines 

•  Automatic  field  editing 

■  Report  fields  can  be  calculated,  sub-totaled  & 
cross-looted  in  any  manner  desired. 

•  Optional  counter  breaks  may  be  set 

•  Automatic  grand  totals 

•  Automatic  statistics 


REQUIREMENTS 

Superkram  (see  below)  and:  Commodore  Pet 
32K  (40  or  80  col)  and  2040/4040/8050  disk  OR 
Apple  II  48K  with  Applesoft  or  language  system 
and  2  disk  drives  or  CORVUS, 


SUPERKRAM 


Now  With  Multi-Key 

Capabilities 

For  Apple  &  Pet 


by  Kvr  Germann 


Since  KRAM^*- was  introduced  in  1979  it  has  fast  become  known  as  the  quickest 
and  most  powerful  access  method  for  serious  Apple  and  Pet  users.  Now,  after 
hundreds  of  requests  we  have  added  MULTI-KEY.  MULTI-INDEX,  functions, 
as  well  as  increasing  processing  speed. 


iBv/370  users  havf  VSam  {Virtual  Sioiage  Access  Wetfioa)  lo 
provide  fast.  Heebie  keyeo -access  (o  iheir  data  Now  SUPER  KRam 
(Keyed  Random  Access  Weihod],  Irom  Umied  Sctlware  ot  Amenca. 
gn*es  Apple  and  Pet  u^ers  ihe  same  fJesibphly,  subs tani. ally 
jncjeasing  rhc  processing  power  ol  |he  Apple  and  Pet 

Uniil  SUPER  KRAW  the  orniy    random  acces^ '  C3pabii»iy  m  tne 
Apple  and  Pti  consysied  ol  a  crude  form  ol  'reiatiwe  record" 
pfocessirtg  Wr>die  ihi?  is  usable  fo>  v*fv  simple  applicaTrons.  ii  (ails 
far  shon  ci  irie  neeas  ol  today  s  business  and  analytical 
appiicaiians  Using  SUPER  KRAM  records  may  be  processed  C?y 
any  one  at  multiple    Key    wslues.  wfiicft  may  tonsisl  ol  any  J(ind  of 
data,  numbers,  letters,  special  crtaraciers.  elc  Even  Appiess  long- 
awaited  DOS  3  3  doesn  t  have  anyihmg  like  this'i 


KRAM'"  2.0  Only  S99.95 
SUPER  KRAM'-Only  S175 


KRAM  •  2.0  Regular  Features 

•  Wj-iiTen  in  6&0?  machine  ctrfe 
Basic  Compatible 

•  Create'Opcn  a  daiasci 

•  ful  record  by  key 

•  Add  A  delete  lecDrdK  by  key 

■  Get  any  record  by  f  ull-Pariiai  hey 

•  Acciiss  by  Any  key  m  as  IJltle  as  ?  sec   I  5  mc  wi|h  Corvus  di&h  1 

•  SupporTB  mtiijipie  disks 

•  Read  ne»I  or  pri-viOuS  recofd 

•  Dynamic  space  ailocauon 

•  Dynamic  SpAce  reclamation 

■  Dynamic  index  compiessiorn 

■  Files  never  need  TGocganualton 

•  Compalibio  wjth  language  systems 


ATTENTlOiy-EXISTIWG  KRAM  USERS 
Seficl  MS  wilh. 


disk  niHl  HOW  !o  Unilfid  Sollvwnr*?  lor  irriproweri  version  ol  Kram 


SUPER  KRAM'S  "  Added  Features 

•  MULTiKey  SUPPORT  -  Allowing  simuitaneoLs  access  TO  a 
KRAM  lile  by  more  tfian  one  key  deld 

•  HI  SPEED  HEAD  -  Thvs  leaturc  allows  increased  lOspeed  up  to 
160%  'aster  during  processing  ct  SUPEM  KRAkfl  read  ne«i  read 
[iiev'ous  put  and  aeleio  requests 

■  IMPROVED  INDEX  ARCHITECTURE  -  Allowing  laster  mdfii 
searcriL-r5  antl  more  elticnent  disk  space  utilization, 

■  JNTEGHATED  BASIC  COMMANDS  —  Allowing  SUPER  KRAM" 
commands  to  be  coded  in-line  with  Basic,  provjdi  ng  easier  Lsa'ge 
of  KHAM  (hian  ever  before 

•  USER-SPECIFIABLE  BUFFER  POOL  -  Allowing  the  user  lo 
specitv  now  many  K  f?AM  tiles  are  allowed  o^sm  at  one  time,  will 
Support  ,iny  number  qI  KRAM  fplcs 

•  LOGICAL  RECORDS  (KEYS  MAY  BE  NON-UNlQUEl  Records 
atfded  to  tiit'KRAM  files  are  uriTnediaiely  accessible  by  enyol  ttic 
[lofmcd  he/s  Inr  ttv  lilr  (Aulnm^tic  Upgradel 

"  KRAM  ?  U  tili-s  .in-  lolairy  compatible  with  SUPER  KRAM 


750  3RD  Avenue, 

New  York  NY  10017 

(212)  682-0347  Telex  640055 


UNITED 
SOFTWARE 
OF 
AMERICA 


Look  for  the  RED-WHITE-BLUE 
United  Software  Display  at  your  local 
computer  dealer,  or  send  check  or 
moneyorder.  plus  $3.00  shipping  to: 

DEALER  INQUIRIES  INVITED 

lt€0UE$T4    KRAM  are  Irade  macks  of  Unil«d  Sonw«r«ol  Amcuca 
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running  program,  type  continue  and  resume  the 
program.) 

-  PASCAL  The  Jensen-Worth  Standard 
implementation 

-FORTRAN  Waterloo  Standard  version 

-APL 

-  COBOL  (later  in  the  spring) 

-  An  Assembler  that's  supposed  to  be  quite 
powerful 

This  entire  package  plugs  into  the  standard  CBM 
8032.  You  plug  it  in  and  go  with  a  switch  on  the 
side  to  select  your  processor  mode. 

The  "delicate  negotiations"  were  necessitated 
by  the  fact  that  all  of  this  expansion  power  was 
developed  outside  of  Commodore.  Bill  McLean 
and  crew  at  BMB  Compuscience  in  Canada  were 
responsible  for  developing  the  hardware,  and 
Waterloo  University  in  Canada,  developed  the 
software.  Commodore  will  be  marketing  the 
product  worldwide.  My  thanks  to  Dr.  Frank  Winter 
at  Sheraton  College  for  his  help  in  ptitting  this  all 
together. 

The  unit  will  be  introduced  in  the  US  at  the 
NCC  beginning  May  4,  Given  the  configuration  of 
hardware  and  software,  it  certainly  looks  as  if  we're 
looking  at  a  potentially  viable  entry  into  the  small 
business  market  of  the  Apple  III  and  others.  We 
have  no  confirmation  of  the  upgrade  price,  but  the 
reliable  rumors  suggest  the  expansion  will  cost 
much  less  than  the  current  retail  8032  price  of 
$179.5.00. 

Well  Dr.  Chip,  it  looks  like  COMPUTE!  will  be 
covering  the  6809  before  too  long. 

News  From  The  Atari  Front 

Atari  has  announced  a  major  software  development 
and  support  project.  See  the  new  products  section 
for  more  information.  Axlon  has  announced  a 
256K  memory  system  for  the  Atari  800.  The  unit 
provides  eight  expansion  memory  slots,  allows 
bank  selection  of  memory,  and  comes  with  memory 
management  software.  For  more  information, 
they're  at  170  Wolfe  Road,  Sunnyvale.  CA  94086. 
(408)730-0216. 

At  the  West  Coast  Faire,  Atari  interest  was 
quite  strong.  Macrotronics,  siiowingoff  rheir 
screen  printer  package.  (Atari  to  Trendcom  200  or 
Paper  Tiger)  was  quite  busy.  Atari  corporate, 
though  not  exhibiting,  had  a  private  previe\v  for 
user  group  officers.  .Among  other  things  they 
showed  off  the  new  word  [iroccssor  and  I  heard 
excellent  reports  on  it. 

That's  A  Switch,  PET 

Data  Equipment  Siqjply  was  demonstrating  a  new- 
ROM  switching  device  ai  the  show,  and  at  least  two 
companies  (one,  (Canadian  and  one,  English)  have 
now  announced  versions  of  "soft"  ROM  —  PE  E  or 


CBM  RAM  expansion  boards  or  chips  that  can 
retain  information.  In  a  future  i.ssue,  we'll  have 
some  enlightenment  on  the  situation,  furnished  by 
Jim  Butterfield.  © 


The  Readers' 
Feedback 


Robert  Lock  and  Readers 

It's  nice  to  be  back.  First  of  all,  we're  hoping  to 
have  Ask  The  Readers  up  and  rtmning  by  next 
month.  That's  our  new  three-way  column  that 
serves  as  an  interface  between  progranuners  with 
problems  and  readers  with  solutions.  The  Beginner's 
Page  returns  next  month. 

On  this  positive  note,  let's  get  started: 

"Thanksfor: 

1 .  Putting  the  magazine  into  envelopes  again. 

2.  Ask  the  Readers.  I  will  ansioer. 

3.  A  magazine  that  gets  better  each  month." 
Thanks  for  the  boost.  For  you  cynics  saying  it  may 
be  better  but  it  also  gets  later,  we  know.  We've 
expanded  our  production  staff,  and  brcjught  all 
typesetting  ancl  camera  work  in-house.  Frankly, 
we've  been  growing  so  fast  we  had  to  do  a  little 
catch-up.  This  is  our  1 2th  issue,  and  we've  almo.st 
tripled  in  circulation  in  the  last  6  or  7  months  of 
our  20  month  history! 

"Keep  up  the  good  work  . . .  need  some  good  small 
business  programs  for  the  Atari  (Payroll,  taxes, 
investments,  etc.)." 

"Article  on  stock  market,  financial  news  software.  Is 
there  software  available  that  allows  mer  to  create 
own  daily  bar  charts  from  Dow  Jones  News  Service 
quotations?" 
Okay,  you  reader/authors,  .\nyone  willing  to  share 
their  business  investment  programs  in  articles. 
We're  all  interested. 

"The  main  reason  I  buy  COMPUTE!  ^v  the  strength 
of  its  articles  on  ATARI.  Belter  distributorship  in 
the  Orange  County,  CA  area  is  needed." 
We're  certainly  interested  in  developing  better 
distribution.  If  your  local  dealer  sells  out  of 
COMPUTE!  in  two  days  (w^hich  many  do),  suggest 
they  order  more.  If  your  local  dealer  doesn't  yet 
carry  COMPUTE!,  ask  thetn  to  give  us  a  call. 

Until  next  lime  ...  keep  those  cards  and  letters 
coming. 

Thanks, 
Robert  Lock 


Shortcuts  to  more 
Commodore  capability 

4  amazing  new  devices  to  make  your  Commodore 
friendlier,  faster  and  more  productive  thian  ever 


If  you  have  a  Commodore  computef,  life 
at  the  keyboard  just  got  easier,  thanks 
to  four  new  products  from  Kansas  City  Com- 
puters, Inc. 


THE  SILENT  SWITCH 

If  you  use  a  switching  device  on  your  ROM 
based  software,  you  may  have  experienced 
—select  line  transient  problems. 

Introducing  our  Triple  Flip  firmware.  It's  a 
remarkably  simple  switch  that  can  be  elec- 
tronically mechanically  switched.  With  the 
external  switch  running  to  internal  switching, 
there  are  no  address  lines  outside  the  com- 
puter. That  nips  select  line  transient  problems 
right  at  the  source. 

Triple  Flip  lets  you  piace  three  individual 
ROMS  in  a  single  ROM  socket.  Asingle  switch 
can  control  up  to  seven  Triple  Flips. That  gives 
you  21  ROM  capability. 

Versatile?  Triple  Flip  is  one-socket  ROM 
selectable  tor  Commodore  computers  2716, 
2532  and  2732.  It  also  fits  Pet  2001B,  N  and 
later  models. 

And  like  all  KCCI  products,  it's  backed  by 
our  full  guarantee  and  90-day  warranty. 

Don't  change  chips  every  time  you  switch  to 
another  program.  And  don't  risk  select  line 
transient  problems.  Put  Triple  Flip  to  work  lor 
you  for  just  S39. 95. 

30  NEW  COMMANDS 

Until  now.  you've  had  to  punch  the  keys  24 
times  or  more  to  put  some  commands  into 
action.  Commands  like  transferring  programs 
to  disk  or  paper,  or  appending  program 
modules. 

Order  our  UtiliRom  and  start  using  your 
computer's  memory  instead  of  your  own. 
UtiliRom  includes  an  enhanced  DOS  univer- 
sal wedge  that  lets  you  make  most  of  your 
present  commands  in  two  keystrokes.  Imag- 
ine having  all  this  at  your  command: 

•  Wild  card  directory  (DOS) 

•  Rename  a  file  (DOS) 

•  Wild  card  file  scratch  (DOS) 

•  Copy  files  on  disk  (DOS) 

•  Reset  disk  system  (DOS) 

•  Initialize  2000  series  drives  (DOS) 

•  Check  error  channel  (DOS) 

•  New  a  disk  (DOS) 

•  Validate  a  disk  (DOS) 

•  Scroll  down 

•  System  cold  start 

•  One  key  command  to  load  a  program 
(DOS) 

•  Send  program  listing  to  printer  (with"  or 
without"  form  feed  at  end) 

•  Send  screen  contents  to  printer  (normal 
mode"  or  squeezed') 

•  Send  screen  contents  to  disk  file  by  any 
name' 

•  Disk  program  append' 

•  Repeat  key  function" 


•  Kill  to  turn  off  repeat' 

•  Escape  to  turn  off  ROM' 

•  Convert  hex  to  decimal  or 

•  Convert  decimal  to  hex  (with  error 
detection) 

•  Fast  jump  to  monitor 

•  Fast  shift  to  upper  or  lowercase 

•  Fast  jump  to  cold  start 

•  One  key  command  to  save  a  program 

•  Beep  (programmable)" 

'Asterisk  indicates  routines  which  can  be 
called  in  basic  as  subroutines  for  Increased 
computer  power. 

Warning!  Extensive  testing  has  proven  that 
even  casual  users  of  UtiliRom  become 
hooked  on  its  efficiency  and  speed.  Serious 
programmers  and  custom  software  designers 
appreciate  the  fact  that  routines  are  included 
for  fast  disk  I/O  —  up  to  3times  fasterthan  the 
system  routines.  In  addition.  UtiliRom  can 
help  protect  software  designs  from  theft. 

UltiiRom  firmware  is  available  for  any 
socket  on  any  Commodore  system  (including 
the  Address  9000).  When  used  with  Chipmate 
firmware  (below),  you  can  use  UtiliRom  m  the 
same  socket  simultaneously  with  one  other 
2K  ROM  such  as  Toolkit'". 

Order  UtiliRom  now  at  just  S49.95. 

Order  Chipmate  firmware  with  UtiliRom  for 
same  socket  simultaneous  use  with  most 
other  2K  ROMs.  Chipmate  with  UtiliRom  is 
only  S61.90,  Chipmate  alone  is  S14.95. 

COMPUTERIZED  SCRATCH  PAD 

Dream  up  anything  you  want  and  put  it  on 
yourscreen.  Punch  acoupleofkeysand  put  it 
on  disk  in  less  than  two  seconds.  Retrieve  it 
anytime,  almost  as  fast  as  youcan  visualize  it. 
Hit  two  more  keys  and  it's  generated  on  your 
printer  in  page-perfect  format. 

You're  not  dreaming.  You're  using  Screen 
Pro  softv/are.  the  new  disk  based  system  that 
adds  exciting  new  powers  to  your  computer 
—  and  a  faster  response  than  ever  before. 

From  compiling  grocery  lists  to  editing  cat- 


Kansas  City  Computers,  Inc. 

5214  Blue  Ridge  Boulevard 

Kansas  City,  Missouri  64133  •  Phone  816/356-6502 


alogs.  from  diagramming  football  plays  to 
animating  them,  Screen  Pro  makes  text  and 
diagram  work  incredibly  simple, 

Screen  Pro's  entire  2000characterscreenJs 
displayed  in  a  fraction  of  a  second.  You  can 
easily  place  this  subroutine  into  any  software 
you  write,  for  quick  access  later  In  fact,  an 
eight  line  program  gives  you  access  to  any 
oneof  10.000  pagesof  information  — allwithin 
four  screens! 

Clear,  understandable  documentation 
shows  you  how  to  tailor  Screen  Pro  to  your 
exact  needs.  And  it  opens  your  eyes  to  uses 
limited  only  by  your  imagination  —  for  only 
$39.95. 

MONEY  BACK  GUARANTEE 

All  four  products  come  to  you  with  com- 
plete, easy-to-follow  documentation.  Instal- 
lation instructions  that  are  a  snap.  Plus  step- 
by-step  examples  that  walk  you  through  the 
process. 

You  get  more  than  documentation  with 
your  KCCI  order.  You  get  dependability. 
Dependability  backed  by  our  Money  Back 
Guarantee.  Plus  our  full  90-day  Service 
Warranty  (that's  three  times  as  long  as  most  of 
our  competitors'  warranties). 

Start  investing  less  time  inyourcomputer— 
and  start  getting  more  out  of  it.  Fill  out  and  mail 
this  coupon  with  your  check  today. 

Dealer  inquiries  welcome  —  Phone  us  right 
now  for  full  information.  (816)  356-6502. 


Toolkif*  is  a  trademark  of  Palo  Alto  iCS  inc 
'"Commodore  Business  Machines 
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Name 

Address. 
City 


.State. 


Computer  make 

Disk  system  make. 


_Zip 

.Model. 
_  Model  - 


YES'  Ptease  send  me  these  shortcuts  lor  more  cOiTiputer  capability.  My  check  is  enclosetJ. 
D  TRIPLE  FLIP  $39.95        D  CHIPMATE  WITHOUT  UTILIROM       314.95 

n  UTILIROM  S49.95        D  SCREEN  PRO  S39.95 

G  CHIPMATEWITH  UTILIROM  S61.90       D  TOTAL  ORDER 


(Add  SI. 50  shipping  &  insurance  for  U.S.  orders.  Add  S3. 10  shipping  for  foreign  orders  - 
must  be  in  U.S.  funds.  In  Missouri,  add  4''lj  sales  tan.) 


■  payment 


BYTEWRITER-1 

Price  Breakthrough 
from 


MICROTEKinc 


•  • 


The  World's  First  Under  $30  _ 
80  Column  Dot  Matrix  Printer 


WHY  DID  IT  HAPPEN? 

We  were  approached  recently  by  a  man  with 
an  idea.  He  is  one  of  the  leading  American 
nnanufacturers  of  dot  matrix  print  mechanisms. 
He  had  observed,  as  we  had,  that  in  recent 
months  certain  foreign  printer  manufacturers 
were  increasing  their  share  of  the  low-cost 
printer  market  at  an  alarming  rate- 
He  thought  there  MUST  be  a  way  to  fight 
back.  And  he  was  right.  We've  since  formed  a 
working  alliance  with  this  manufacturer,  and 
have  brought  our  first  joint  offering  to  the 
market. 

HOW  DID  WE  MAKE  IT  POSSIBLE? 

We  set  out  to  combine  his  proven  low  cost 
print  mechanism  with  the  simplest  possible 
control  electronics.  Advances  in  single-chip 
microprocessor  technology  and  price  erosion  of 
components  during  the  last  year  helped  to  make 
this  long  awaited  dream  come  true  -  a  printer 
that  can  be  sold  for  less  than  half  the  cost  of 
the  computer  that  drives  it.  A  $299  printer. 

But  cost-effective  designs  and  efficient 
manufacturing  operations  weren't  enough. 
Computer  retailers  can  make  up  to  a  $250 
markup  on  the  foreign  models.  Could  we  hold  to 
a  $299  list  price  and  give  the  dealer  enough 
incentive  to  sell  the  Bytewriter-1?  No  way.  We 
had  to  try  a  more  direct  approach. 

YOUR  BUY  DECISION  -  DEALER  OR  MAIL  ORDER 

There  are  some  very  good  reasons  to  buy  your 
first  computer  through  a  dealer.  There  is  a 
certain  amount  of  hand-holding  required  when 
you  decide  to  buy  a  personal  computer.  This  is 
one  of  the  main  functions  of  the  retail  computer 
store.  And  most  of  them  perform  this  function 
very  well. 

But  why  would  anyone  want  to  buy  add-on 
equipment  through  a  dealer?  If  you  find  a 
product  that  has  been  designed  for  and  tested 
with  your  particular  computer,  you  can  safely 
bypass  the  computer  dealer.  You  can  have  the 
best  of  both  worlds.  You  can  save  money  by 
buying  direct  from  the  manufacturer,  and  you 
can  be  certain  that  your  new  device  will  work 
when  you  get  it. 

We've  done  extensive  testing  with  the  most 
popular  computers  -  the  TRS-80,  the  Apple  II, 
and  the  Atari  400  and  800.  If  you  own  one  of 
these  computers,  we  guarantee  you  won't  have 
any  interface  problems  with  the  Bytewriter-1. 


TRS-80  is  a  trademark  of  Radio  Shack.  Div,  of  Tandy  Corp. 
Apple  II  is  a  trademark  of  Apple  Cotnpuler.  Inc. 
Atari  400  &  800  are  trademarks  of  Atari.  Inc. 
Bytewriler-1  is  a  trademark  of  Ivlicrolek.  Inc. 


FOUR  THINGS  YOU  SHOULD  KNOW  BEFORE 
YOU  BUY  THIS  PRINTER 

We  don't  want  any  unhappy  customers.  We'd 
like  you  to  know  the  limitations  of  our  printer,  as 
well  as  its  advantages.  There  are  some 
differences  between  the  Bytewriter-1  and  the 
higher  priced  printers  you  may  be  looking  at; 

1}  The  Bytewriter-1  takes  single  sheet  and  roll 

paper  only.  No  pin  feed  paper. 

2)  We've  used  a  7-wire  print  head.  No  fancy 
lower  case  descenders. 

3)  There  aren't  any  software  frills  in  the 
Bytewriter-1, like  VFU  controls.  However,  if 
your  main  interest  is  getting  software 
listings  or  printing  letters,  you  won't  care. 
And,  with  a  bit  of  ingenuity,  you  can 
provide  VFU  functions  in  your  own 
programs. 

4)  You  can't  go  into  a  computer  store  and 
pick  up  a  Bytewriter-1.  They're  sold  direct 
only  by  MICROTEK. 

We  realize  it's  unusual  to  point  out  the 
limitations  of  a  product  in  an  ad  that  promotes 
it,  but  we  think  it's  important  for  mail  order 
buyers  to  fully  understand  what  they're  buying. 

The  Bytewriter-1  will  fill  the  needs  of  most 
people.  People  who  don't  see  the  sense  in 
spending  extra  money  for  features  they'll  never 
use. 

ORDER  THE  CONFIGURATION  THAT'S  JUST 
RIGHT  FOR  YOU 

The  Bytewriter-1  is  available  with  an  interface 
cable  and  complete  instructions  for  use  with 
three  of  the  most  popular  small  computers  on 
the  market  today,  the  Apple  II,  the  Atari  400/800, 
and  TRS-80  Models  I,  II,  and  III.  One  of  our 
divisions,  MICROTEK  PERIPHERALS  CORP.,  can 
even  provide  you  with  the  expansion  card  or 
module  that  your  computer  may  require  to  drive 
a  printer. 

CALL  OR  WRITE  TODAY  FOR  MORE 
INFORMATION. 

We  have  people  standing  by  to  answer  your 
questions. 


Microtek,  Inc. 
9514  Chesapeake  Drive 
San  Diego,  CA  92123 
Tel.  714-278-0633 
Outside  Calif,  call 
toll  free:  800-854-1081 
TWX.  910-335-1269 


MICROTEKi 


inc. 
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Computers 
And  Society 


David  D.  Thornburg 
Los  Altos,  CA 

Several  years  ago,  when  Betty  Burr  and  I  were 
conducting  workshops  for  "computer-phobic" 
adults,  we  thought  that  someone  should  write  a 
"computer  demystification"  book  which  would  sell 
to  general  audiences.  Since  that  time  we  have  seen 
several  such  books  come  to  market  (some  of  which 
have  been  reviewed  in  this  column). 

I  recently  received  another  book  on  this  topic 
which  is  certain  to  sell  quite  widely,  both  because  it 
is  handled  by  a  well  known  publisher  (Simon  and 
Schuster)  and  because  its  principal  author  is  the 
famous  science  fiction  writer  Frank  Herbert.  The 
book  was  written  with  the  help  of  Max  Barnard, 
the  person  who  worked  with  Herbert  in  setting  up 
his  computer  system. 

The  book's  title,  "Without  Me,  You're  Nothing, 
is  taken  from  the  author's  advice  that  when  you 
first  set  up  your  computer  you  should  stand  in 
front  of  it  and  say: 

"Yoti  stupid,  inanimate  chunk  of  hardware! 
Without  me,  you're  nothing.'" 

As  you  can  see,  this  book  is  a  bit  theatrical.  This 
sense  of  theatrics,  more  than  anything  else,  becomes 
the  basis  of  one  of  this  book's  greatest  shortfalls.  I 
share  some  of  Frank  Herbert's  goals,  e.g.,  the 
demystification  of  computer  technology  for  the 
general  public;  but  my  fear  is  that  he  has  replaced 
one  myth  with  another  one. 

Betty  and  I  found  that  many  adults  feel  that 
you  have  to  be  a  technical  wizard  to  use  computers 
effectively.  We  feel  that  this  is  a  most  damaging 
myth  since  it  serves  to  disenfranchise  a  large 
number  of  people  who  might  otherwise  find  utility 
in  this  technology.  Our  position  (as  regular  readers 
of  this  column  might  remember)  is  that  comptiters 
are  like  automobiles  in  the  following  way.  You  do 
not  have  to  know  how  to  drive  a  car  to  survive  in 
our  society,  but  you  do  need  to  know  enough  about 
them  to  not  walk  out  in  the  street  in  front  of  one.  I 
think  that  "computer  literacy"  is  important  for 
much  the  same  reason.  Computers  arc  becoming 
so  commonplace  that  each  of  us  should  have 
enough  awareness  of  tlieir  capabilities  to  decide 
for  ourselves  whether  or  not  to  gain  access  to  this 
technology. 


Frank  Herbert  has  a  different  goal  in  mind. 
He  places  the  potential  computer  user  in  an  "us" 
vs.  "them"  context.  For  example: 

Things  are  happening  in  our  luorfd  that  make  a 
nece.ssity  of  the  .skilb  we  are  about  to  share  xviih  you. 
Before  long  it  u>ill  at  least  be  a  matter  of  self-defense 
for  yon  to  have  your  axon  computer  and  be  able  to  use 
it.  You  are  already  being  taken  advantage  of  by 
people  with  computers.  You  will  not  be  able  to  meet 
that  challenge  or  keep  up  with  other  changes  unless 
you  acquire  a  computer  yourself 
...  Please  take  our  warning  to  heart.  Very  soon,  if 
you  don't  have  access  to  a  computer,  you're  going  to 
be  racing  in  something  equivalent  to  the  Indianapolis 
500 — only  you'll  be  on  foot. 


...demystification  of  computer 
technology  for  ttie  general  public, 


Hmmm.  My  fear  is  that  Mr.  Herbert's  zeal  will 
result  in  the  replacement  of  one  type  of  miscon- 
ception with  another  one. 

Fortunately  there  are  delightful  streams  of 
insight  in  this  book  which  tend  to  counter  the  mild 
spasms  of  hysteria  sampled  above.  One  of  the  most 
important  points  that  Herbert  makes  is  that  the 
computer  is  a  tool,  not  a  "thinking  machine".  The 
computer  can  amplify  creative  imagination,  but 
not  be  creative  itself.  As  he  says: 

A  pen  is  a  tool.  A  typewriter  is  a  more  sophisticated 
pen.  A  lihraiy  is  a  tool.  A  painter's  easel  is  a  tool.  It 
is  the  creative  mind  behind  the  tool  that  is  important. 
Later  on  he  says: 

Computers  may  he  superb  for  logic  ami  accuracy 
loithin  described  and  de.scribable  limits,  but  don't 
ever  depend  on  one  for  creatnu'  work.  The  machine 
will  not  go  outside  its  limits.  It  has  no  imagination. 
In  fad,  people  oj  limited  imagination,  people  ivho 
don't  understand  what  you  mean  by  "creative 
brainstorming",  tetul  to  lead  the  argument  for  the 
"electronic  brain"  myth.  They  impose  limits  on 
themselves  and  they  want  to  apply  similar  limits  to 
the  universe  because  that  makes  them  feel  safer. 
So  much  for  philosophy.  The  book  also  prom- 
ises to  be  "a  practical,  ea.sy  to  understand  guide  to 
usingyoviY  own  personal  computer  system".  The 
technical  side  of  this  book  needs  tremendous 
reworking.  I  am  astounded  that  a  publisher  as 
large  as  Simon  and  Schuster  would  publish  a  book 
with  so  many  basic  errors  in  it.  For  example,  I  have 
never  heard  of  a  disk  drive  being  refeted  to  as  a 
"disk  driver",  but  that  is  what  Herbert  calls  it 
throughout  the  entire  book.  In  his  quest  to  show 


THE  FINEST  IN  FANTASY  CAME  SOFTWARE 


48K  -  w/disk 


48K  -  w/disk 


32K  -  w/disk 


48  -  w/disk 


—  Climb  aboard  the  Starship  Herman 

CAfcACTIC  QUEST  —Warp  through  the  64solarsysteinsln  Hires  graphlcswllhCryslalsonicssound.  Fire 
lasers  and  rifter  pods  as  you  battle  the  Vegans  in  real  time  simulation.  In  Galatic  Quest  we  have  attempted  to  combine  the 
best  elements  of  a  Star  Trek  type  game  with  one  similar  to  Space  Trader.  What  is  Skishi  and  where  is  the  Pleasure  Planet? 
In  some  systems,  lurking  behind  swarms  of  asteroids,  are  Space  Pirates  who  will  gut  your  ship  and  leave  you  a  derelict  in 
space.  To  win  Galactic  Quest  you  must  be  shrewd  a  business  man  as  well  as  a  top  notch  warrior.   $29.95 

LHaftlC  WHR5  —  Attacking  aliens  in  3D.  Thousands  of  approach  simulations  and  10  levels  of  difficulty.  Three 
kinds  of  invader  craft  scored  by  size  and  attack  mode.  An  eiiciting  Invaders  type  game  with  perspective  and  sound.  For 
fantasy  enthusiasts  from  8  to  SO.  $29.95 

5HND5  of  RraHRS  —  You  embark  on  the  Maiden  Voyage  of  the  Starship  Herman.  This  game  takes  up 
almost  200K  and  uses  2  disks.  It  includes  more  than  300  Hires  screens  animated  scenarios,  a  3  dimensional  maze,  and  a 
Martian  labyrinth  drawn  entirely  with  hexagons.  The  takeoff  and  landing  sequences  are  paddle  or  joystick  controlled  for 
the  Apple  and  Atari  and  the  game  has  5  full  scenarios.  Once  you  land  on  Mars,  you  wander  through  fields  of  Sasquati  and 
Degwat.  Beware  of  the  Vishu  and  the  Lizardmen  of  Meshim.  Seek  the  wise  Mudra  and  unlock  secrets  hidden  for  cen- 
turies. Glyphs  written  on  the  Martian  Sand  hold  the  key  to  the  mystery  for  which  we  offer  $100  to  the  first  to  solve  it.  To 
answer  a  question  we  have  been  asked  many  times  —  yes,  Sands  of  Mars  attempts  to  fully  utilize  the  sound  and  graphics 
capabilities  of  the  Apple  and  Atari  to  their  max!   $39.95 


—  Cross  the  threshold  to  new  worlds. 

HOUSE  OF  USHER  — Walk  thedreaded  corridors  ofthe  deadly  House  of  Usher.  Complete  with  40  rooms 
and  hundreds  of  aggressive  monsters  and  unique  treasures.  This  is  not  your  typical  text  adventure  game  but  goes  far 
beyond  that,  with  animated  monsters  and  a  visual  display  of  each  room.  We  believe  this  to  be  the  first  indoor-outdoor 
game  ever  written  for  a  microcomputer  game  which  includes  graphics.  You  may  choose  to  wander  through  Usher's 
scenic  garden  paths  or  brave  the  perils  of  the  graveyard  and  descend  into  the  crypt.  Beneath  the  house  there  are  laby- 
rinths, shrinking  rooms,  and  torture  chambers  with  no  doors  or  windows.  Your  character  may  pick  up,  drop,  or  use  ob- 
jects, fire  arrows,  or  run  frantically  for  the  door  when  pursued  by  some  loathsome  creature.  As  the  old  grandfather  clock 
4     ticks  away,  you  will  have  until  dawn  to  solve  the  Usher  Mystery  and  win  a  real  live  $100  prize!   $24.95 

'■""ERI  At  WALKER  (atari  16K)  —  For  you  Atari  people  out  there,  here's  a  fantastic  game  pack  of  4  games  with  revolutionary  new 
graphics  routine  and  Crystalsonics.  As  Luke  Skywalker  you  have  taken  control  of  an  All  Terrain  Armored  Transport  and  with  your  lasers  arc  fending  off  the 
Imperial  attack  forces.  Written  especially  for  Atari  by  Mike  Potter.  The  game  pack  also  includes  Laser  Nim,  Auto  Race,  and  Gunflght.  Will  run  on  Atari  400 
or  800  with  disc  and  Joysticks.  $29.95 

ADw  E  NTURELAN  D  2041  (Coming  June  I )  —  Step  with  us  through  the  Crystal  door  into  the  world  of  tomorrow's  fantasy.  In  the  great  Outback 
of  Australia  in  the  year  of  2041  .willbebuiltthe  greatest  Aduentureland  of  all  time.  Through  your  computer,  you  can  experience  six  separate  worlds  of  fantasy.  These 
programs  will  take  up  more  than  500,000  bytes  of  memory  and  fill  6  disks.  Many  of  the  options  may  be  played  by  up  to  six  players  and  in  many  cases  against  the  com- 
puter itself.   $59.95 


WAR  GAMES 


■wORlD  WAR  III  —  This  isathreescenario  war  game  inHires  graphics  withsound.Itis  not  merely  thecon- 
version  of  a  board  game  to  computer,  nor  are  your  pieces  represented  by  lifeless  text  charcters.  It  may  be  played  by  two 
persons  and  takes  about  8  hours  to  complete.  The  rules  are  simple  enough  that  you  won't  have  to  spend  several  days 
reading  your  manual  before  you  can  play.  It  contains  2  world  maps  and  a  fairly  detailed  map  of  the  Iran-Iraq  battle  Held. 
All  scoring,  animation,  and  positions  are  handled  by  the  computer  —  no  separate  tablets  to  fool  with.  Moves  are  input  by 
both  players  in  series  of  3  and  when  the  space  bar  is  pressed  the  battle  becomes  animated.  A  must  see  to  believe  .... 
$29.95 

f  (Coming  July  1)  —  Awargamewithgraphicsverysimilar  to  World  War  III.  We  have  attempted  to 
make  this  as  detailed  as  possible,  down  to  what  each  individual  is  wearing,  his  line  of  sight,  and  the  number  of  bullets  he 
has  flred .  It  will  occupy  two  disks  and  may  be  saved  over  a  period  of  weeks.  We  will  be  publishing  more  information  on  this 
in  BYTE  MAGAZINE  in  July.  $49.95 


prder  line  open  24  hrs  /  day  (408)  683-0696 


We  accept  VISA  &  Mastercharge 
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how  "simple"  computers  are,  he  says  that  a  light 
switch  is  the  simplest  computer.  This  kind  of 
misconception  serves  no  one  well.  For  one  thing, 
coinputers  are  complex  (just  as  automobiles  are 
complex).  The  beauty  of  computers  is  that  you 
don't  have  to  understand  how  they  work  to  use 
them.  So  why,  for  this  audience,  should  an  author 
fill  the  book  with  inaccurate  simplifications  which 
might  make  the  reader  feel  Hke  a  fool  when  sharing 
this  new  found  knowledge  with  more  technical 
comrades? 

The  authors  are  strong  proponents  of  top- 
down  programming,  and  have  developed  a  new 
flow  chart  system  (called  PROGRAMAP)  for  laying 
out  programs.  I  found  this  concept  to  be  poorly 
presented,  but,  like  much  else  in  this  iiook,  created 
with  good  intentions.  As  tor  languages,  BASIC  is 
king  for  Herbert.  It  isn't  clear  how  well  he  grasps 
the  language  himself,  though,  as  you  can  see  from 
his  definition  for  the  BASIC  keyword  RETURN: 

RETURN  trmisfers  the  program  hack  to  the  state- 
ment after  GOSUB.  It  is  the  Inst  statement  of  a 
subroutine.  (Not  to  be  confused  luith  directions 
referring  to  the  RETURN  key  on  your  keyboard. 
The  RETURN  we  refer  to  here  is'a  word  in  BASIC 
that  performs  in  the  computer  in  a  way  similar  to 
that  key.  With  this  word,  you  build  the  key's  function 
into  the  program.) 

COME  ON  FRANK!  The  RETURN  key  is  built 
into  a  program  by  PRINTing  CHR$(13).  It  is  a  line 
terminator,  period.  The  keyword  RETURN  is 
completely  unrelated  to  this  function. 

The  author  of  a  book  with  the  circulation  this 
one  will  have  should  be  getting  much  better  techni- 
cal advice,  and  his  agent  and  publisher  must  share 
the  blame  for  mistakes  of  this  sort.  Now,  if  only 
Erma  Bombeck  would  write  the  sequel.  .  . 

A  reader  writes  .  .  . 

I  received  a  letter  a  few  weeks  ago  from 
COMPUTE!  reader  Bob  Forman  who  is  concerned 
that  I  might  be  paying  too  much  attention  to  the 
futurists.  Commenting  on  the  January  '81  Compu- 
ters and  Society  column  on  communications,  he 
says: 

I'm  a  beliex'er  in  the  comfniterand  its  place  in 
the  family,  in  business  and  in  many  more  places 
that  it  keeps  falling  into.  BUT  IT  WILL  NEVER 
REPLACE  THE  NEWSPAPER  and  the  10 
o'clock  news! 
As  someone  who  works  closely  with  the  newspaper 
industry.  Bob  shared  his  experiences  with  the  use 
of  microfilm  as  an  alternative  to  bound  volumes  of 
newspapers.  He  found  that  —  whatever  its  efficien- 
cies might  be  —  the  poor  human  factors  aspect  of 
microfilm  prevented  it  from  leplacing  bound  files 


(as  many  thought  it  would).  He  says  that  the  reasons 

for  this  are  simple: 

Why?  Bomul files  are  simple,  easier  to  use.  Try 
getting  someone  70  years  old  to  .sit  iv  jront  of  a 
microfilm  reader  or  a  computer  long  enugh  to  read 
a  whole  newspaper.  You  can't  sit  back  in  your  old 
lounge  chair  and  read  a  flm  reader  without  some 
pretty  expensive  stands  or  cranes  to  manipulate 
the  thing,  ,w  it's  not  a  practical  thing  for  every 
evening.  The  young  buclts  can  .stand  to  read  a 
screen  for  a  iviiile  but  it's  a  more  tiring  process 
than  reading  a  paper ...  And,  I  haven't  seen  a 
high  speed  printer  yet  which  will  show  a  picture 
of  a  cabbage  head  accurately,  or  anything  that 
approaches  a  good  p/iotograph. 

I  tliink  that  reader  Bob  makes  a  good  point  — 
but  only  if  one  talks  about  one  media  format 
replacing  another  one.  The  telephone  lias  not  yet 
eliminated  the  mail  and  telegraph.  The  television 
has  not  yet  eliminated  the  radio.  I  do  not  believe 
that  any  rational  person  thinks  that  the  printed 
word  will  disappear  when  terminals  appear  in 
everyone's  home.  What  I  do  believe  is  that  a  very 
large  segment  of  the  general  population  will  start 
fitting  the  computer  information  utility  into  their 
mix  of  information  sources,  and  that  it  will  result 
in  the  kind  of  re-equilibration  period  we  had  when 
television  started  to  compete  with  radio. 

The  most  important  advantage  of  computer 
based  information  utilities  is  their  ability  to  access 
many  diverse  data  bases,  rather  than  forcing  the 
user  to  listen  to  one  person's  view  of  the  news. 

As  always,  it  is  great  to  hear  from  readers.  I 
look  forward  to  your  letters  and  messages  (I  can 
still  be  reached  on  the  Source  at  TCE1.'?2).  Till 
next  month.  ...  Q 

You  may  write  to  David  at  Innovision, 
P.O.  Box  13]  7, 
Los  Altos,  CA  94022. 


EDUCATIONAL  PROGRAMS 

FOR  COMMODORE  PET,  VIC 

M^.L^.© 

IMJcrocomputer  Assisted  Learning  Aids) 

Software  programs  on  cassette — elementary  levels 

32  programs — 4  per  month 

all  PETS— $48.00 

Pet  educational  software  catalog 

300  programs — $2.50 

COMM*DATA  SYSTEMS 

P.O.  BOX  325 

MILFORO  Ml.  48042 

1313)685-0113 

Michigan  residenti  add  Mx 


NEC  spinwriter™ 

quality,  reliability,  and  affordability 

is  NOW  available  backed  by 

service  and  support  you  can  depend  on. 


Dealers,  O.E.M.'s,  and  end-users  all  realize 
that  service  is  the  key  ingredient  of  a  wise 
purchase— SO  DOES  T-COM! 

T-COIVI,  a  fully  authorized  NEC  distributor,  be- 
lieves a  successful  sale  doesn't  end  with  the 
delivery  of  the  product.  We  offer  the  service 
and  support  to  keep  your  Spinwriter  operating 
with  the  least  amount  of  down  time  for  you 
and  your  customers.  With  our  fully  factory 
trained  service  staff  and  unique  service  poli- 


cies, we  make  every  effort  to  keep  your  pur- 
chase from  T-COM  an  investment  you  can 
count  on  to  deliver  satisfaction  everyday. 

T-COM  represents  a  select  group  of  depend- 
able state-of-the-art  word  and  data  process- 
ing products  and  supplies.  From  Data-MATE 
and  Smith  Systems  terminal  furniture  to  NEC 
printers  and  supplies,  you  can  count  on  the 
finest  products  available  all  backed  by  T-COM's 
firm  commitment  to  service  and  support. 


Dealer  and  end  user  inquiries  are  welcome  for  these  fine  products: 

■  Data-MATE  Terminal  Furniture  ■  Printer  Interface  Cables  ■  Gates  Sound  Covers 

■  NEC  Spinwriter  ■  Spinwriter  supplies  and  accessories  ■  Smith  System  Furniture 

FOR  INFORMATION  ON  DEALERSHIPS,  PRODUCTS,  AND  SERVICE 

Contact  T-COM,  INC. 

Two  North  Plaza  P.O.  Box  3005 

Jackson,  Michigan  49204 

Phone  (517)  787-9280 
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T-cam,inc. 


a  C.C&S  Systems  Company 
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10  DAY  FREE  RETURN 


APPLE  n 

We  carry  the  most  complete 
inventory  of  Apple  computers, 
peripherals,  and  software  CALL 
Oui  Best  Selling  Apple  STstenL 
Sore  over  S250  on  oui  most 
popular  Apple  System  System 
includes  a  48K  Apple  11  Apple 
Disk.  DOS3-3.  &  ControUer.  and  a 
Sup  R  Mod  RF  Modulator 
Ijst  $a09,00 

COMPUMAET  Sale  Pricft 

S1895.00 
SOFTWARE  FEOM  APPLE 
Apple  Plot  TTie  pertecl  graphic 
complement  for  Visicalc  S70.00 
Dow  Jones  News  8<  Quotes 

S9S.OO 
Adventure  (Uses  4810  S3S.OO 
DOS  Tool  Kil  S75.00 

Apple  Fortran  S200.00 

Tax  Planner  S120.00 

FKOM  PERSONAL  SOftwCne 
Visicalc  S149,00 

Desk  Top  Plan  $99.O0 

NEW  FROM  MUSE 
The  Voice  S39.95 

Super  Text  S150.00 

Address  Book  $49.95 

MisceUccneou£  Apple  n 
Accessories. 

Easy  Writer  (80  col  need  a 
Videx)  S249,00 

NEW  fiom  Apple  toi  the  Apple 
IL 

DOS  33  Convert  disks  to  16  sector 
format  lor  23%  more  storage  and 
taster  access  S40,00 

NEW  f  01  the  Apple  n 
From  MicioSofl 

16K  r?AM  Board  S195.00 

FOI?TRAN  S17S,00 

COBOL  S75O.00 

Card  Reader  liom  Mountain 
Hardware  SU95.00 

M-Res  Dump  tor  460  Printer  Iiom 
the  Computer  Station  S49.95 

Trend  Spotter— Statistical 
graphics  program  Works  v/ith 
Visicalc  S27S.OO 

Exclusive— Magic  Wand  for  the 
Apple-Requued  Videx.  Z-80  soft- 
card    complete  system  $925.00 
(l?equires  •48K  Apple  and  d-.5k ) 


Super  Selling  Tenninols 

We  have  the  loUowmg  Lecn 

Sieglsi  Terminals  in  stock  of 

prices  too  low  to  print— Call  for 

quotes 

ADM — 3A  Indus- 

tnes  lavorite 

dumb  terminal 

lor  some  very 

smart  reasons 

ADM— 3A  - 

NEW  liom  Lear 

Siegler  CALU 

n  IS  HEREI-ll 

IS  the  new 

Intermediate  Terminat 

trom  Lear  Siegler.  CaO  lot  details 


HASDWABE  ACCESSORIES  FOR 
APPLE 

Silentype  Printer  w/x  face     $635 
Super  Sound  Generator 
(mono)  S159  (stereo)  S2S9 

Light  Pen  $249 

XIO  Controller  (plugs  into  pad- 
dle port)  S49 

Mountain  Computer— Expan 

sion  accessories  for  your  Apple 
Introl-lO  System  S289 

Super  Talker  S299 

The  Music  System  S54S 

ROM  plus  board  w/Keyboard 
Sltei  S199 

Clock  Calendar  $280 

Apple  Expansion  Chassis     $650 
ROM  Writer  S175 

16  Channel  A  lo  D  Converter 
$350 

From  VIDEXl— Video  Tenn. 
80  Col  X  24  line,  7x9  Matrix  plug 
in  compat±jle  board  for  the 
Apple  11  Price  S325  without 
graphics  EPROM  With  graphics 
&ROM  S350. 

SS.tvt  Serial  8t  ParaUel  Apple 
Interlace  S22S 

ABTs  Numeric  Key  Pod  $UO 

Calilornia  Microcomputer 
Keyboard  S195 

Save  S200  on  Apple  Accessories 
with  purchase  of  an  Apple  IL 
Order  accessones  tor  your  Apple, 
and  we  will  give  you  $200  off 
the  purchase  price  ol  those 
accessories  SAVE  S200 

APPLE  m  IS  IN  STOCK— CALL! 
APPLE  III  information  Analyst 
Package-i28K  Apple  III.  Black 
and  White  Monitor  12"  and  infor- 
mation analyst  software 

Price  $4740, 


Dyson  Diskettes -Single  side. 

Single  density.  Hard  or  Soft  Sector 

S5,  ea. 

Memoiei 340rs— 5 '.'  discs 

S3.25  with  hub  ring  for  Apple 

S3.50. 


Memory  Integrated  Clicults— 

Call  lor  qty  discounts  when 
ordering  over  50  units 
Motorola  4U6  (20O 
Nanosecond  Plastic) 
$4,SOea 
Faiichild  2114 
(Standard  Power. 
Plastic)  S4,50  ea 


% 


HP-41C  ColcuJotois S199.00 

Memory  Modules.  Foi  storing 
piograms  ol  up  to  2000  lines  of 
program  memory  S29.95 

■  Extra  Smorf  Card  Reader 
Records  programs  and  data 
Ixick  onto  blank  magcards 
S199.00 

The  Pnnter  Upper  and  Lower 
case.  High  resolution  plot- 
ting. Portable  Thermal 

operation    S3S5.00 

Application  Modules 

S29.95 

NEW  SUPER  41-CV  Systems  with 
Quad  RAMS  built-in,  (Maximum 
memory  on-boaid  leaves  slots 
open  lor  Application  Pacs  and 
peripherals )  The  HP  4iCV 
S309.00 

HP  41CV  Plus  Card  Reader  .--■-■"  ■ 
$474.00 
/ 
HP  41CV  Plus  Card  *- 

Reader  &  Prinlei  S799.00 

Quad  RAMS  lot  the  41 
(Equivalent  to  lour 
Memory  Modules  all 
packed  into  one ) 
S95.00 


IMPORTANT  ORDEKING  tHTOBMATlON  All  oideis  musi  include  A% 
sWppino  and  handtoa.  Mass  lesidents  add  5%  sales  lax  t^lichigan 
residents  4%  loi  soles  lax  Phones  open  Horn  BJO  am  lo70O  pm,. 
tvloa  Fri  ft  OO  am,  lo  4  OO  p  m.  Sat  P.O.'t  accepted  Horn  Dun  & 
Biadslieet  rated  companies-shipment  contingent  upon  leceipt  o( 


CompuMart  carries  the  entire 
Commodore  line  ol  computers 
peripherals,  and  accessoiies- 
call  our  sales  lorce  today  lor 
complete  prices  and  specs 

The  CompuMoit/Commodore 
Word  Fiocesslng  System 

Get  crisp,  letter  quality  output 
and  ease  ot  operation  that's 
unsurpassed  This  system 
includes  a  Commodore  8032  32K 
CPU,  a  4040  Dual  Dist  a  C-Itoh 
printer  and  X/lace.  and  Word 
Pro  4  Plus  (all  cables  included) 
Call  tor  details  and  tow  puces 
List  S5685  COMPUMART  S4995. 

A  complete  system  including  a 
Dual  Disk  Dnve.  Tractor  Printer, 
and  an  80  column  32K  CPU  for 
under  S4000  No  interlaces 
needed  Cables  included 
Ust  S3,985  CompuMart  $3635 

New  accessories  from 
Commodore  loi  Commodore 

Visicatc  S199 

Word  Pro  4  S299 

Ozz  the  Information  Wizard    S395 
Wordcratt  80  S395 

Tax  Preparation  Planner       $495 
Dow  Jones  Portlolio 
Mgmt  System  $149 

Personal  Tax  Calculator  S69 

Assembler  Development 
Package  S99 

SAVE  S200  on  Commodote 
Accessories  with  purchase  ol  a 
32K  PET,  When  you  buy  a  16K  PET. 
apply  SlOO  toward  PET 
accessories.  SAVE  $200l 

Educatois  Talce  Noteli  Comma 
dore  has  extended  its  3  lor  2  deal 
until  6-30-81 


Visit  our  giant 

ANN  ARBOR  STORE 

1250  North  Main  Street 
Ann  Arbor.  Michigan 


SEND  FOR  OUR 
FREE  CATALOG 


COMPUMART  slocks  the  com- 
plete line  of  MATROX  PRODUCTS. 
Call  tor  specs 

COMPUMART  now  oilers  the 
ENTIRE  DEC  LSI-U  PRODUCT  LINE 
Call  tot  prices  &  delivery 

NOVATION  cat'™ 
ACOUSTIC  MODEM 

Answer  Originate 
300  Baud  Bell  103 
$149.00 
NEWID-CAT 
Direct  Connect 
Modern  Irom  Nov 
ation,  S199. 


PM65  Expansion  Accessories  loi 
theAim-65 

Call  lor  specs  and  prices 

Forth  for  Rockwell  AIM  65S195.00 
ROCKWELL  AIM  65 
Our  AIM  system  includes  4K  AIM 
with  BASIC  interpretor  assembler 
Power  Supply.  Cassette  recorder 
&  Enclosure  S799.00 

4K  AIM  65  S499.00 

PL65  High  Level  Language 

S125.00 
Paper  for  the  Aim  (roll)  S2.50 
Rockwell's  4-slot 

Motherboard  (soie)  $175.00 

Fourth  lor  RockweU  AIM-65  $175.00 
850  Interface  w/Coble      S249.95 


NEW  SUPER  SPECIALS— 


HP83  Basic  System-Includes  HP- 
83.  ROM  Drawer,  Mass  Storage 
ROM.  5V4 '  Single  Master  Flexible 
Disc  Dnve,  HP-IB  Interlace  Mod- 
ule. 2  meter  HP-B  cable       S4249, 

HP-85  System-Save  S400  on  HP- 
85  Accessones  with  purchase  of 
an  HP-85,  Order  accessories  with 
your  HP-85  and  we  will  save  you 
S400  oil  the  purchase  price  of 
those  accessories      SAVE  $400! 

HP-85  ACCBSOEIES— We  carry 
HP  Peripherals  (Disk  Drives  to 
Graphics  Plotters)  Enhancements 
(BASIC  Training.  Generai  Statis- 
tica  Financial  Decision  Math.  Lin- 
ear Programming  S95  eo.).  HP-85 
Accessories  (Enhancement 
ROMs.  ROM  drawer.  Overhead 
Transparency  Kit).-  Supplies  (Plot- 
ter Pens,  Tape  Cartiidges).  Inter- 
lace Modules  (HP-IB  Interlace, 
HP-IB  Interconnect  Cables,  Serial 
(RS-232Q  Interlace  Module), 
We  can  get  youi  every  HP 
penpheial  made  lor  the  HP-85 

VISICALC  PLUS  FOR  HP-85  Every- 
thing you  ever  wanted  trom  Visi- 
calc plus  plotting  S200. 


COMPUMART  exclusive  ATARI 
SPECIALS— Alan  800  Personal 
Computer  System— fncludes  800 
operators  Manual  16K  RAM 
Memory  Module,  lOK  ROM_ 
Operating  System.  Power 
Supply.  TV 
Switch       iJhL 

S899.     "^ 


PERIPHERALS 

Atan  4IO  Program  Recorder 

$89,95 

Atari  810  Disk  Drive 

(SlOO  ofl  with  purchase)   S699.95 

NEW  Dual  Disk  double  density 

S1499.95 
825  Printer  (Centronics  737) 

S995.00 
RS232  Interlace  w/Coble  S249.95 
NEWl  Light  Pens  $74.95 

NEW!  Visicalc  lor  Atan      $199.00 
Educatois  Take  Note,  Alan  has 
extended  its  3  tor  2  deal  until  6- 
308L  Any  educational  instttution 
that  buys  two  Atari  SCO's  will 
receive  an  Atari  400  computer 
absolutely  FREE.  Call  our  sales 
dept  toi  complete  details 


signed  purchase  oide:  Solo  prices  valid  loi  month  ol  magazine 
dale  only— all  pnces  subject  to  change  without  notice  Our  Ann 
Aibor  retail  store  is  open  ILOO  a,ra  to  7.00  p  m.  Tues-Fn..  10:00  am 
lo  500  p m  Saturdays 
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EXCLUSrvi:  Jrom  COMPUMART! 
Special  Ottei.  ZenlUi  Coloi 
Video  Monlloi  toi  S379! 

NEW  FROM  SANYO-Four  Gieal 

Momtois  at  Low  COMPUMART 
Prices  Sanyo's  new  line  oi  CRT 
data  displcry  monitors  are 
designed  (or  Ihe  display  ol 
alphanumeric  or  graphic  data. 

9 "  Sanyo  Monilor  B/ W  S179. 

12 "  Sanyo  Monitor  B/ W  S289. 

12 "  Sanyo  Monitor  with  green 
screen  $299. 

THE  NEC  MONITOH— Composite 
video  using  BNC  connectors.  8- 
pin  connedor  lor  VCR/VTR 
video  loop.  In/Oul  and  television 
reception.  S599. 


CENTRONICS  PRINTERS 

The  incredible  Model  737,  The 

closest  Ihing  to  letter  quality  punt 

lor  under  SI.OOO.  737-1  (Parallel 

Interlace) 

List  Price  S899  SPECIAL  S795. 


7301 


Sale  Price  S695. 


NEW  FROM  INTEGRAL  DATA 
THE  roS  560  PRINTER.  All  Ihe 
exciting  features  ol  Ihe  400 
series  plus  Wh "  paper  capacity, 
;32  coL  graphics  printer,  j 

Price  S1695. 


IDS  445.  Pnced  lower  

than  the  440  and  equipped 
with  a  belter  print  head.  IDS 
Aib  w/grophics  $894.  IDS  445 
w/o  graphics  $795. 
IDS  460     $1,295 

The  460's  teatuies  include:  Cone- 
spondence  quality  printing,  high 
resolution  graphics  capability, 
programmable  print  juslilicalion 


Omni  Printeis 

bom  Texas 
tnstiumeiits 

The  eiO-LisI  $1895.  SALH  S1795. 

The  820  (Ro)  Package- 
Includes  machine-mounled 
paper  tiay  and  cable,  A  com- 
pressed pnnt  option  and  device 
lorms  control  are  standard  lea- 
tuies.  S2i55. 

The  820  (KSR)  Packages 
Includes  fuU  ASCII  Keyboard  plus 
all  of  Ihe  lecitures  ol  the  RO 
S2395. 


COMPUMART  FEATURES 
TYPEWRITER  QUALITY 
PRINTERS: 


C-rrOH  STAfiWEITEE:  LETTER 
QUALnr  PRINTING  FOR  UNDER 
S2,000! 

This  daisywheel  punter  gives 
high  quality  at  a  low  price  25 
cps.  Parallel  and  seiiol  inletlaces 
available.  Price  S1895. 

For  this  month  only  COMPUMART 
will  give  10%  oM  on  any  word 
processing  package  when  you 
buy  one  ot  Ihe  above  letter  qual- 
ity printers  from  us 


1 


NEC  THE  FIRST  NAME  IN  LEFTER 

QUALITY  PRINTERS 
COMPUMART  oilers  beautilui 
print-quality  with  NEC  Spmwrilei 
terminals  Both  KSR  and  RO  ver- 
sions give  unsurpassed  hard 
copy  output  CALL 

NEC  Spinwrileis  include  these 

special  features 

—One  ol  Ihe  highest  reliability 

factors  in  the  industry  Less 

down  time 
— Spinwriters  utilize  the  unique 

NEC  design  thimble  as 

opposed  to  the  daisywheel 

Capable  ol  30  million 

impressions 
—National  Service 
—Both  thimbles  and  ribbons  are 

quickly  and  easily  changed 

Ribbons  come  in  a  cartridge 

tor  slain  Ijee  lemovai 
Options  Available  lor  NEC 
Spinwriters 

—Field  installable  tractor  feed 
-Can  be  oidered  wilh  cut  sheet 

leeder  instaLed  al  lactory 


COMPUMART  PRICE    List  Pnce 

5510  $2749.  S3055. 

5515  S2849.  S3135. 

5520  $3149.  S3415. 

5525  S3249.  S3455. 

5530  $2749.  S3055 

SPECS 

S510  Receive-Only  (RO).  Fnction 
feed  platen  copy  control 
impression  control  bidirec- 
tional IO-12  pitch.  6-8  lines 
per  inch,  auloleed  rtbbon- 
oul,  cover  open  switch,  and 
seU-test 

5515  RO  unit,  specs  same  as 
5510s  Diablo  compatible 

5520  KSR  with  numenc  keypad. 
Specs  same  as  5510 

5525  KSR  with  numeric  keypad. 
Diablo  compatible,  specs 
same  as  5510 

5530  RO  uniL  same  specs  as  5510 
Centronics  parallel  inter- 
lace 


^1    NECANDC-ITOH! 


COMPUMART  has  been  serving  the 
computei  needs  ol  industry  since  1971. 

We  stock,  lor  immediate  shipment 
only  those  products  from  the  finest 
micro-computer  manulacturers. 

And  any  product  except  sortwore, 
can  be  returned  within  lO  days  (or  a 
full  reiund— even  il  you  just  change  your 
mind 

We  also  honor  all  manulacturers'  wananties. 


Our  expert  teclinicians  will  service  any  product  we 
sell  that  cannot  be  better,  or  taster,  serviced  by  the 
manulacturei's  local  service  center. 


Call  us  for  more  inlormation  on  products,  product 
contiguration  and  service.  Our  phones  are  open 
Monday  thm  Friday,  a30  a.m  to  7:00  p.m.  and  Sat- 
urday HOG  am.  to  4,00  p.m. 

We  have  a  staff  of  highly  knowledgeable 
sales  people  waiting  to  hear  from  you  and  to 
help. 

Because  service  is  what  we're  all  about 


800-343-5504 

QVQTT 1V  AQ    /  ^^  ^^^^'  ^^^  617-491-2700 

I'imm^^lCOMPUMART 


65  BENT  STREET,  DEPT,  1406 ,  P.O.  BOX  568 
CAMBRIDGE,  MA  02139 
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Editor's  Note:  From  time  to  time  we  present  what  we  choose 
to  call  "Guest  Commentaries" .  These  articles  don't  neces- 
sarily express  the  opinion  o/ COMPUTE!,  but  generally  do 
raise  questions  we  think  should  be  discussed.  .  .  RCL 

Computer 
Aided 
Instruction, 
Boon  or  Bust? 


Alfred  D'Attore 
Phoenix  AZ  85021 

Computer  Aided  Instruction,  (CAI,)  has  been 
around  for  quite  a  while.  Originally  introduced 
into  out  public  schools  when  "Time  Share"  became 
commonplace  —  about  ten  years  ago  —  it  has  met 
with  rather  indifferent  success.  At  its  best,  it  ap- 
peared to  offer  no  particular  advantage  over 
traditional  teaching  methods.  At  its  worst  —  and 
that  could  be  very  bad  indeed,  with  the  frequent 
equipment  "crashes"  and  student  blunders  —  it 
was  frustrating  and  ineffective.  It  was  always 
crushingly  expensive.  School  boards  had  horrible 
visions  of  endless  banks  of  computer  terminals 
with  attending  telephone  connections,  computer 
time  costs,  repair  contracts  —  an  endless  cash  flow. 

The  personal  computer  boom  of  recent  years 
has  eased  expenses  somewhat,  but  CAI  is  still  not 
employed  to  any  great  extent  in  our  public  schools. 
Even  when  computer  systems  are  purchased,  they 
are  rarely  used  for  CAI.  Rather,  they  are  used  to 
support  a  relatively  minimal  study  of  computer 
programming  and  the  endless,  ever-present 
games.  Sometimes,  they  are  not  used  at  all.  I  know 
of  one  school  in  North  Phoenix  which  recendy 
purchased  a  disk-operated  computer  system 
complete  with  printer.  Although  access  is  provided, 
it  lies  virtually  unused  in  an  office,  gathering  dust. 

The  reason,  of  course,  is  the  lack  of  suitable, 
appropriate  software.  Too  few  people  are  pro- 
gramming for  our  pubHc  schools.  And  when, 
occasionally,  we  do  obtain  CAI  programs,  they  are 
most  often  tutorial  in  nature  and  therefore  inap- 
propriate for  use  in  primary  and  secondary  schools. 
Let  me  elaborate  upon  this  point. 

Any  public  school  teacher  can  tell  you  that  the 
normal  learning  process  involves  a  very  small 
amount  of  "teaching"  and  an  immense  amount  of 
"doing."  This  is  especially  true  when  the  subject 
areas  are  basic;  for  example:  reading  and  arith- 
metic. In  this  circumstance,  even  the  most  skillful 


CAI,  if  it  is  basically  tutorial,  is  a  waste  of  time  and 
good  programming  talent.  It  is  simply  too  much 
work  for  too  little  return. 

And  this  assumes  the  programming  is  success- 
ful. Often  it  is  not.  Often,  the  programming  places 
too  much  burden  upon  the  student  with  respect  to 
display  interpretation  and  console  operation. 
Many  programs  have  "bugs."  Since  with  this  type 
of  programming,  the  student  interfaces  directly 
with  the  computer,  the  frustration  level  often  runs 
very  high. 

But  the  most  important  reason  for  the  general 
ineffectiveness  of  this  type  of  programming  in  our 
public  schools,  lies  in  the  very  nature  of  our  young 
students.  The  classroom  teacher  quickly  learns  that 
young  people  must  establish  an  acceptable /jer.?ona/ 
relationship  with  their  instructor  before  meaningful 
learning  can  take  place.  An  indifferent  machine  is 
at  a  big  disadvantage  there. 


...let's  allow  the  teacher  to  teach... 


Certainly,  if  tutorial  programs  arc  prepared 
cleverly,  students  will  be  enthralled,  initially.  But 
that  never  lasts  very  long.  In  my  classes,  three 
weeks  is  about  par,  after  which  the  system  becomes 
just  another  classroom  static  fixture,  like  the 
countless  desk  calculators,  visual  aids  and  pro- 
grammed instruction  packages  that  remain  largely 
unused  in  every  classroom.  Yet,  if  software  is 
available  at  all  for  the  first  twelve  grades,  it  is  most 
often  of  this  type. 

Of  even  less  use  are  the  ancillary  programs: 
the  "curriculum  guides  to  CAI,"  the  "systems 
approaches-cum-administrative  programming" 
packages  and  the  various  conceptual  outlines. 
Teachers  get  "overviews"  by  the  bucketfuU.  We 
treat  them  with  the  respect  due  most  things  that 
come  in  buckets.  We  need  specifics,  not  generalities. 
I  will  be  specific. 

Let's  allow  the  teacher  to  teach.  Then  we  may 
use  the  computer  to  help  him  with  his  job. 

The  computer  should  be  programmed  to  do 
that  which  it  is  uniquely  qualified  to  do:  create 
exercises.  As  I  pointed  out  previously,  individual- 
ized student  work  —  exercises  —  represents  the 
greater  portion  of  the  learning  process.  A  com- 
puter, working  in  this  fashion,  will  be  helping  the 
teacher  do  the  greater  part  of  his  job.  In  skill- 
oriented  subjects  like  arithmetic,  for  example, 
students  are  required  to  do  exercises  repeatedly, 
with  graduated  levels  of  difficulty.  Students  are 
drilled. 

There,  I've  said  it.  That  dirty  word:  drill.  It 
has  become  anathema  in  recent  years.  It  is  supposed 
to  turn  students  off.  But  realistically,  there  isn't 
anyother  way  to  learn  basic  skills,  especially  basic 


May,  1981,  Issue  12. 


COMPUTE! 


19 


COLLEGE  BOARDS 

for  TRS-80 
PET,  APPLE 

The  best  way  to  sharpen  your  skills  for  the  College  Boards  is  to  work  on  actual  examinations. 
Each  of  these  program  sets  confronts  the  user  with  a  virtually  limitless  series  of  questions  and  answers 
Each  program  is  based  on  past  exams  and  presents  material  of  the  same  level  of  difficulty  and  in  the 
same  form  as  used  in  the  College  Board  examination.  Scoring  is  provided  in  accordance  with  the 
formula  used  by  College  Boards. 

SAT,  PSAT,  N.M.S.Q.T.,  set  includes  7  programs  covering  Vocabulary,  Word  Relationships,  and 
Mathematics.  Price  $79.95 

EDUCATOR  EDITION  -  SAT,  PSAT  Includes  all  of  the  above  programs  plus  detailed  solutions  and 
explainatlons  for  each  problem  plus  drill  exercises.  SAT  set  includes  14  programs.  $149.95 

GRADUATE  RECORD  EXAMINATION  set  includes  10  programs  covering  Vocabulary,  Word  Rela- 
tionships, Mathematics,  Logical  Diagrams,  Analytical  Reasoning.  $139.95 
EDUCATOR  EDITION  -Graduate  Record  Exam  Set  includes 20  programs.  $199.95 

SWORD  OF  ZEDEK 

Fight  to  overthrow  Ra,  The  Master  of  Evil.  In  this  incredible  adventure  game,  you 
must  confront  a  host  of  creatures,  natural  and  supernatural.  To  liberate  the  King- 
dom, alliances  must  be  forged  and  treasures  sought.  Treachery,  deceit  and  witch- 
craft must  be  faced  in  your  struggles  as  you  encounter  wolves,  dwarves,  elves, 
dragons,  bears,  owls,  ores,  giant  bats,  trolls,  etc.  Each  of  the  12  treasures  will  en- 
hance your  power,  by  making  invisible,  invulnable,  more  eloquent,  more  skillful  in 
combat  etc.,  etc.,  as  you  explore  the  realms  of  geography  both  on  the  surface  and 
underground.  Dungeons,  temples,  castles,  mountains  etc.,  are  all  a  part  of  the 
fantastic  world  of  Ra,  Each  game  is  unique  in  this  spectacular  and  complex  world 
of  fantasy.  ■  $24.95 


KRELLGAMEPAK 
Incredible  bargain,  15  unique 
and  challenging  games!!'. 


SUPER  STAR  BASEBALL 


Hostage 
Prime  Time 
The  Black  Death 
Star  Clipper 
Bulls  &  Bears 
Banzai 
Banzai  II 


Primary  Fight 

Black  Gold 

Wordsworth 

Hard  Scrabble 

Bible  Quode 

Shakespeare  Quode 

Bill  of  Rights  Quode 


ALI.  FJME 

SUPER  STAR  BAS£BALl 

Sdmpir  Lineup 


SUPen  STAR  BASE  BALI 

Simple  Lineup 


B.  Rulh 

T  Wiil.jmi 

O.Parker 

1.  Rice 

L   Cehiin 

1   FOJI 

W,  Stjtgell 

H  Aaron 

^  DiMdfyjia 

H  Crt^ntwrg 

W.  Mays 

(..Brock 

f.  Ijckson 

R.  Hofnsby 

P.  Row 

R  Carew 

C,  Siilef 

H  Wilion 

O  Cepeda 

H.  Killfbrew 

S  .VluiiJl 

B   Terry 

C,  Vazilremsk 

R.  Allen 

T   Cobb 

M-.Mjnlle 

W.  McCovey 

R.  Lellore 

W.  Mavs 

H,  Ajron 

R.  lackion 

R-  Zisk 

C  Young.p 

W-  lohn^on-p 

C  Sim 

B.  Madlock 

R  CuidryP 

T,  Se.iv?r.p 

Super  Banzai  TRS-80  only,  $39.95 


TIME  TRAVELER 

The  best  of  the  adventure  games.  Confronts  player  with  compfex  decision  situa- 
tions and  the  ciemand  for  real  time  actfon.  Using  the  Time  Machine,  players  must 
face  a  challenging  series  of  enviornments  that  include;  the  Athens  of  Pericles, 
Imperial  Rome,  Nebuchadnezzar's  Babylon,  Ikhnaton's  Egypt,  [erusalem  at  (he 
lime  of  the  crucifixion,  The  Crusades,  Machiavelli's  Italy,  the  French  Revolulion, 
the  American  Revolution,  and  the  English  Civil  War.  Deal  with  Hitfer's  Third  Reich, 
Vikings,  etc.  At  the  start  of  each  game  players  may  choose  a  level  of  difficulty... 
the  more  difficult,  the  greater  the  time  pressure.  To  succeed  you  must  build 
alliances  and  struggle  with  the  ruling  powers.  Each  game  is  unique.  $24.95 


Performance  i»  based  on  Ihe  int*n 
jition  ai  dclu^l  bdttinH  Jnd  pilchinf; 
dalj.  Cjme  cjn  be  played  by  one 
or  two  players  wilh  lh«  computer 
deling  as  a  »cond  player  when  de- 
iired.  Playerj  Selecl  roilers  and  line- 
ups and  esercii*  strafegfc  chokes  in- 
cluding hit  and  run,  ba*e  slealinR, 
pinch  hhling,  inlentional  walk.  etc. 
Highly  realistic,  there  are  Iwo 
venions,  ALL  TIME  SUPfR  STAR 
BASEBALL,  and  SUPER  STAR  BASE- 
BAIL  fealuring  players  of  Ihe  current 
decade.  Each  includes  about  5D 
players  allowing  nearly  an  Infinite 
number  of  roster  and  lineup  possl- 
biliilics, 


§^f>. 


*ALL  PROGRAMS  AVAILABLE  FOR 

TRS-80,  APPLE  II  &  PET 

■  ProgMms  for  APPLE  or  TRS-80  are  on 
disk  or  cassetl,  please  specify. 


®      KRELL  SOFTWARE 

Send  check  or  money  order  to 
21  Milbrook  Drive,  Stony  Brook,  NY  1 1 790 

(516)751-5139 
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arithmetic  skills.  One  must  perform  in  a  skill  to 
make  it  one's  own.  And  I  don't  mean  just  once. 
Indeed,  I  sometimes  think,  to  the  extent  the 
learning  process  is  difficult,  to  that  same  extent  is 
the  learning  worthwhile. 

But  far  from  turning  students  off,  my  expe- 
rience has  taught  me  that  young  people  become 
eager  —  even  enthralled  —  when  they  begin  to 
acquire  measurable  skills.  And  drill  does  it.  Disci- 
plined, repeated,  old-fashioned  drill.  For  drill,  the 
computer  is  without  parallel. 

In  my  approach,  a  printer  is  required.  Exercises 
must  be  printed  out  at  all  times,  if  the  computer  is 
to  be  used  effectively.  Exercises  must  be  produced 
immediately,  in  unlimited  numbers,  tailored 
specifically  to  meet  the  particular  need,  and  optim- 
ized for  clarity,  organization  and  student  use. 

Answers  must  be  provided  for  all  exercises. 
Where  appropriate,  they  should  be  reduced  to 
lowest  terms.  There  should  be  no  ambiguities. 
When  dividing  with  decimals,  for  example,  accuracy 
requirements  should  be  ordered  and  neat.  Since 
students  work  directly  upon  these  exercise  sheets, 
this  will  coerce  them,  gently,  to  be  equally  neat. 
This  is  most  important,  especially  for  students  in 
remediation.  Very  often,  their  work  is  much  too 
sloppy,  and  like  other  students,  they  tend  to  relate 
their  teacher's  requirement  for  neatness  to  "nit- 
picking," rather  than  to  recognition  of  the  fact  that 
ours  is  a  place-value  number  system.  A  digit's 
position  in  a  numeral  is  quite  as  important  as  its 
value.  Sloppiness  confuses  "place." 

Spaces  should  be  provided  between  digits  in 
all  those  exercises  where  "carries"  and  like  manip- 
ulations are  required.  Students  should  not  be 
forced  to  crowd  their  work.  Alternately,  they 
cannot  be  permitted  so  much  room  as  to  encourage 
carelessness.  "Neatness  begets  neatness.  Order 
begets  order."  I  don't  know  who  said  that  first. 
Perhaps  it's  a  paraphrase.  But  it  is  a  dictum  that 
should  be  kept  foremost  in  mind  when  preparing 
computer  aided  instruction  of  this  type. 

To  illustrate,  a  portion  of  an  exercise  sheet  for 
integer  addition  is  shown  in  figure  I.  In  this  partic- 
ular program,  an  ordered  pair  of  numbers  specifies 
the  number  of  addends  and  the  number  of  digits 
per  addend.  Note  the  "spacing"  of  digits.  The 
number  of  problems  and  their  spacing  are  set 
under  program  control.  They  vary  automatically 
with  the  difficulty  level  of  the  problems. 


LESSON  NO.  1 

(01)         5  4  6  1 
5465 
9506 

Name 

(02) 

6747 
2272 
98  6  0 

riass 

(03)         7  5  8  2 
7767 
3571 

Figure  1 

Of  course,  for  basic  skills  instruction,  programs 
running  the  gamut  of  arithmetic  skills  are  required. 
I  have  used  just  such  programming  for  the  past  five 
years.  Permit  me  now  to  enumerate  the  advantages 
that  have  come  to  light  in  this  period: 

Programs  are  immediately  adaptable  to  student 
competency  levels.  Through  simple  question  and 
answer,  an  instructor  may  choose  from  a  number  of 
levels  of  difficulty. 

Parents  and  family  may  enter  into  the  training 
process.  Since  exercises  are  produced  in  moments 
and  answers  are  provided  in  the  appropriate  for- 
mats, students  may  take  any  number  of  them  home 
and  be  drilled  by  other  family  members. 


...the  computer  becomes  a 

valuable  teacher's  ald.„lt  Is  not 

a  surrogate  teacher... 


Individualized  instruction  —  always  desirable 
in  the  classroom  situation  —  becomes  less  open- 
ended.  The  student  runs  htde  risk  of  drilling  him- 
self in  incorrect  procedures.  With  individualized  in- 
struction —  for  reasons  of  practicability  —  a  student 
is  often  required  to  work  for  extended  periods  with- 
out direct  supervision.  With  the  answers  before  him, 
however,  he  cannot  fail  to  be  alerted  to  incorrect 
procedures. 

The  computer  becomes  a  valuable  teacher's  aid , 
It  is  swift,  versatile,  flexible,  indefatigable  and  inex- 
haustible. But  it  is  an  aid:  no  more.  It  is  not  a  surro- 
gate teacher.  This  approach  is,  therefore,  non- 
threatening.  Since  computer  aided  instruction  and 
its  associated  equipment  must  be  sold  —  essentially 
—  to  teachers,  this  is  a  not-inconsiderable 
advantage. 

Last,  this  approach  is  cost-effective.  A  com- 
puter system,  used  in  this  manner,  is  easily  afford- 
able. A  2,000  dollar  system  can  serve  a  school.  Such 
a  system  currently  serves  the  school  wherein  I'm 
employed.  Admittedly,  this  is  a  bare-bones  ap- 
proach, and  I  don't  suggest  for  a  moment  that 
other  schools  should  spend  so  little.  In  today's 
market,  5,000  dollars  would  purchase  a  disk-oper- 
ated system  with  sufficient  equipment  backup  to 
insure  reliable  operation  for  an  indefinite  period. 
That  is  the  proper  way  to  go. 

In  this  article,  I  have  dealt  primarily  with  the 
mathematics  in  describing  this  "alternate  approach" 
to  CAI.  But  I  have  gone  far  enough  afield  in  my 
programming  efforts  to  have  determined  these 
methods  are  applicable  in  other  teaching  disci- 
plines. With  right  programming,  computers  can  be 
a  boon  indeed  for  our  public  schools.  Without  it, 
they  are  just  expensive  toys.  So  what  shall  it  be? 
Boon  or  bust? 


An  Intelligent  Alternative 


In  the  research  you  are  doing  before  purchas- 
ing your  computer  printer,  you  are  probably  con- 
fused by  the  various  claims,  speeds,  choices, 
shapes  and  prices.  Weli,  we'd  like  to  clear  the  air 
3  bit  and  tell  you  about  the  most  unusual  comput- 
er-prinler  around  —  the  TYFRINTER  221. 

You  see,  it's  unusual  because  it  is  totally 
compatihle  with  every  computer  and  word  proces- 
sing program  . . .  from  the  largest  to  the  smallest. 
It's  versatile  to  the  point  of  incredibility  . . .  We'll 
discuss  the  broad  advantages  and  explain  the 
details. 


THE  DAISY  WHEEL 

The  special  daisy  wheel  supplied  Is  of  a  unique 
design  consisting  of  a  1 00  character  carrying  radii. 
Each  radii  is  formed  of  two  distinct  types  of 
plastic  —  an  "elastic  plastic"  for  the  stalk  of  the 
radii,  and  a  comparatively  "hard  plastic"  used  to 
form  the  character  area.  This,  combined  with  a 
very  narrow  character  profile  and  a  special  posi- 
tioner on  each  of  the  100  radii,  guarantees  a 
uniform  character  density.  There  is  near  perfect 
geometric  positioning  of  the  character  with  no 
character  higher  or  lower  than  the  others.  And 
because  of  its  unique  dual  material  design,  micro- 
vibrations have  virtually  been  eliminated,  leaving 
your  final  copy  clean,  clear  and  smudge  free.  The 
copy  produced  is  comparable  to  that  produced  by 
metal  daisy  wheels  and  at  a  fraction  of  the  cost. 

HAflO  Sf  cnoM 


THE  KEYBOARD 

The  keyboard  has  been  referred  to  as  a  triumph  of 
human  engineering  ■  from  the  way  the  keys  seem 
to  have  been  custom  designed  to  fit  your  fingers, 
to  the  way  the  special  leature  switches  have  been 
grouped.  A  flip  of  a  switch  for  under  computer 
control  ol  course)  and  the  printer  becomes  a 
foreign  language  machine.  Push  a  button,  and  like 
magic  the  printer  automatically  locates  and  lines 
up  columns  of  figures,  perfectly  balanced  between 
the  margins.  This  incredibly  fast,  extraordinarily 
quiet  electronic  keyboard  puts  more  programming 
power  at  you  fingertips  then  printers  costing  five 
to  ten  times  as  much. 


TYPRINTER  221 


THE  DISPLAY 

The  TYPRINTER  221  presents  a  new  dimension  in 

operator/machine  communications  In  the  manual 
(typewriter)  mode,  the  printer  controls  and  verifies 
ail  entries  before  printing.  The  display  exhibits  the 
last  15  characters  of  the  text,  word-byword,  until 
the  end  ol  the  line.  The  operator  may  control  what 
will  be  printed  before  the  actual  printing  takes 
place.  This  new  found  flexibility  enables  you  to 
make  modifications  along  the  entire  line  and  in 
both  directions.  This  20  character  plasma  display 
has  the  ability  to  scroll  backwards  as  well  as 
forwards:  will  give  the  operator  a  visual  indication 
as  to  which  print  mode  is  currently  being  selected 
as  well  as  the  number  of  characters  remaining 
before  the  right  margin  is  reached.  The  display  will 
also  indicate  to  the  operator: 

The  numtiei  ol  chatacliirs  dH<!ililblf  t^hal    charailrfs    wilj    bp   m^ciled 

n  Tht  merrioiv  tnio  in  ekiiltng  [til. 

I^hen   rtie   prime)  ii  m  an  errof  Wien  >he  mcnioiv  fcr  The  pievmui 

cQndifiom  line  has  been  seJecred. 

When  a  pte  pfogianinied  Inim  lay      A  warning  meisitge  ih^i  The  eii^  n^ 

out  has  been  selected  the  page  is  being  a[>piaached 

When  the  piiniei  IS  Dperaiing  lion     ThaT  a  hypheTiation  decision  must  tte 

Tti«  inieTnal  memary.  made 

PRINT  MODE 

The  TYPRINTER  221  will  allow  you  to  automatic- 
ally   highlight    individual    characters,    words    or 
complete  sentences.  Whatever  is  entered  from 
the   keyboard  or  from  the  computer,  even  an 
existing  text  lile,  can  be  printed  in  one  or  more 
of  the  live  different  modes; 
traditional  printing; 
underlined  characters; 
true  bold  characters  where  the  horizontal 
component  of  the  character  is  increased 
without   disturbing   the   vertical   com- 
ponent; 
characters  which  are  both  bold  and  under- 
lined, and; 
a  feature  unique  among  computer  printers- 
printing  in  reverse  —  white  on  black, 
sort  ol  reverse  video  on  paper. 


MULTILINGUAL  CAPABILITY 

A  unique  and  useful  leature  ol  the  TYPRINTER  221 
IS  its  capability  ol  being  able  to  print  in  several 
languages  without  changing  (he  daisy  wheel. 
In  addition  to  English,  every  standard  daisy  wheel 
has  Ihe  ability  and  the  necessary  characters  to 
prmi  in  French,  Spanish,  Italian  and  German. 


THE  FEATURES 

Automatic  justificilion  of  the  right  margin 

The  eleclromcs  ol  the  TYPRINTER  221  have  made 
right    hand    justification    a    simple,  automatic 

operation. 

Phrase  and  format  storage 
Phrases,  dates,  addresses,  data,  etc.  that 
maybe  stored  in  your  computer's  mem- 
ory may  be  sent  over  to  the  printer  and 
stored  in  one  of  the    "memory  bins"  of  Ihe 
printer.  This  information  may  then  be  used  by  the 
operator  in  the  manual  mode.     This  can  save  you 
hours  when  trying  to  get  a  form  "iust  right." 
Automatic  centering 

Ttie  TYPRINTER  221  will  not  only  center  any  title 
between  the  preset  margins,  but  will  also  center 
over  one  or  more  columns,  or  over  any  specific 
point  and  will  even  align  copy  with  the  right 
margin  independent  ol  the  left  margin. 
Autnmatic  vertical  lines 

A  command  from  the  computer  enables  an  auto- 
matic feature  which  prints  vertical  lines  at  any 
point  on  the  paper. 
Automatic  lab  sequence  recall 
With  the  TYPRINTER  221  you  may  store  and  recall 
the    most    irequently   needed   margin  and   lab 
sequences  for  applications  such  as  daily  corres- 
pondence, statistical  reports,  etc.  This  guarantees 
consistent    high    quality    appearance    of    each 
document. 
Paragraph  indent 

A  computer  command  instantly  sets  a  temporary 
margin  in  order  to  print  one  or  more  indented 
paragraphs  with  respect  to  the  right  margin. 
Automatic  decimal  point  location 
No  matter  how  many  figures  to  either  the  left  or 
right  ol  the  decimal  point,  the  TYPRINTER  221 
will  automatically  line  up  the  figures  with  the 
decimal    point    m    any   position    you   choose. 
Statistical  printing  has  never  been  easier. 
Column  layout 

This  feature  allows  you  to  obtain  automatic  and 
perlect  distribution  of  spaces  between  columns  in 
respect  to  the  margins.  A  perfect  page  balance  is 
assured  without  the  need  to  carry  out  calculations 
or  additional  operations. 

There  is  a  wide  variety  ol  options  that  you  can 
add  to  TYPRINTER  221. 

By  now  you  are  probably  convinced  that  we 
are  sold  on  our  machine,  and  we  hope  you  can 
understand  why.  In  fact,  why  don't  you  use  these 
facts  to  measure  against  any  and/or  all  Ihe  other 
computer  printers  on  the  market. 

When  you  do,  you  will  realize  Ihe  TYPRINTER 
221  IS  an  intelligent  electronic  typewriter,  a  text 
tormatler  —  and  a  brilliant  computer  printer  — 
available  at  a  suggested  list  price  of  only  S2S50. 

TYPRINTER  221  is  available  at  your  local 
computer  shop  —  or  we'll  tell  you  where  you  can 
see  and  try  one  if  you  call  us  at 


fH 


HOWARD 
INDUSTRIES 

2051  E   CERRITOS  AVE..  8C 

ANAHEIM.  CA  92806 

714/778-3443 
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Editor  s  Note: 

We  conclude  our  presentation  of  The  Mysterious 
And  Unpredictable  RND  with  this  installment.  We 
expect  to  make  the  series  artailable  to  teachers,  in 
booklet  form,  within  the  next  few  months. 

...RCL 


Solutions  and  Stuff 

Here  are  our  solutions.  Yours  may  be  different. 
That's  OK,  as  long  as  they  solve  the  problem.  One 
really  nice  thing  about  computers:  There  are  many 
ways  to  write  a  program  that  works! 

Exercise  1. 

(a)  The  smallest  RND  number  is  .0103099732 
in  the  first  sample. 

(b)  The  largest  RND  number  is  .984101932 
in  second  sample. 

Exercise  2.  Smallest  RND  Number  In  A  Sample 


100  REM""==SMALLEST  RNO  NUMBER  IN  A  SAMPLE 

200  REH"-"=F=IND  OUT  HOW  BIG  A  SAMPLE 

210  PRINT  "  KLW  "  ; 

220  PRINT 

230  INPUT  "HOW  MANY  RND  NUMBERS"  ;  N 

300  REM---SET  SMALL  EQUAL  TO  FIRST  RND  NUMBER 
310  SMALL  ::  RNDCO 

1*00  REM---DO  REST  OF  SAMPLE.  COMPARE  EACH  RND 

iil0  REM---NUMBER  WITH  SMALL.  IF  SMALLER,  REPLACE. 

1*20  FOR  K  =  1  TO  N  -  1 

lt30    X  =  RNDO) 

1*40    IF  X  <  SMALL  THEN  SMALL  =  X 

1*50  NEXT  K 

500  REM"""PRINT  SMALL  AND  GO  BACK  FOR  MORE 
510  PRINT  "LARGEST  NUMBER  IN  SAMPLE  IS"  SMALL 
520  GOTO  220 

999  END 


Exercise  3.  The  Small  And  Big 

In  this  program,  we  first  set  both  SMALL  and  BIG 
to  the  same  first  RND  number  (lines  3 1 0  and  320). 


100  REM"::"SMALLEST  AND  LARGEST  RND  NUMBER  [N  SAMPLE 

200  REM---FIND  OUT  HOW  BIG  A  SAMPLE 

210  PRINT  "  CCLRl  "  ; 

220  PRIMT 

230  INPUT  "HOW  MANY  RND  NUMBERS"  ;  N 

300  REM---SET  SMALL  AND  BIG  EQUAL  F!RST  RND  NUMBER 
J10  SMALL  =  RNOCO 
320  BIG  =  SMALL 

400  REM"""DO  REST  OF  SAMPLE.  COMPARE  EACH  RND 

1*10  REM---NUMBER  WITH  SMALL  AND  BIG. 

420  FOR  K  =  1  TO  N  -  1 

430  X  =  RND(l) 

440  IF  X <  SMALL  THEN  SMALL  =  X 

450  IF  X  >  BIG  THEN  BIG  =  X 

460  NEXT  K 

500  REM"""PRINT  SMALL  AND  BiG,  GO  BACK  FOR  MORE 

510  PRINT  "SMALLEST  NUMBER  IN  SAMPLE  IS"  SMALL 

520  PRINT  "LARGEST  NUMBER  IN  SAMPLE  IS"  BIG 

530  GOTO  220 

999  END 
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JINSAM'^  Opens  The  Desk  Top 

Computer  Doors  To 

Easy  Application  Data  Management 


"Your  data  is  in  good 
hands  with  the  data 
manager  from  Jini 
Micro-Systems,  Inc. 
JINSAM  is  a  fast  and 
extremely  flexible  data 
manager." 

Robert  Baker 
Kilobaud 


base  does.  My  HP  system 
cost  $6000  and  JINSAM 
is  easier  to  use." 

Ed  Presnal 
Marketing  Manager 
Phoenix  Distributing 


"So  far,  JINSAM  appears 
to  do  everything  my 
Hewlett-Packard  data 


"We've  printed  over 
30.000  labels  with 
JINSAM.  We  no  longer 
have  an  outside  contract 
My  principal  is  so 
pleased  that  he's  given 

JINI  MICRO  SYSTEMS,  INC. 

Box274-C8,  Riverdale,  NY  10463,  Telephone  (212)  796-6200 


US  three  more  PET's  and 
the  Mother's  and 
Father's  Club  (PTA)  has 
donated  a  new  printer 
with  the  money  we've 
saved.  We're  now  also 
using  JINSAM  for 
fundraising  and  accurate 
records  for  recruitment 
^target  areas." 

George  Morstatt 

Mt.  St.  Michael's  H.S. 

New  York  City 


Commodofe  Approved  Software 


Approved  for  use  with  Wordpro™ 
WordPro  is  a  tfademark  of  Professional  Software,  Inc. 


COMffL 

USERS  GROUP 

FREE  OFFER 

COMAL  is  a  relatively  new  programming 
language  destined  to  become  quite 
popular.  It  already  is  the  official  program- 
ming language  in  Denmark.  It  Is  easy  to 
iearn,  yet  powerful  and  structured  like 
PASCAL. 

Our  COMAL  Information  package  is  FREE 
if  you  mention  this  ad.  It  even  Includes 
Instructions  on  how  Commodore  PET* 
and  CBM  users  can  get  a  COMAL  com- 
piler for  FREE.  Please  Include  a  Self 
Addressed  Stamped  Envelope  with  your 
request. 


COMAL  USERS  GROUP 

5501  Groveland  Ter.,  Madison,  Wl  53716. 

—outside  USA  please  add  $2.00  for  Airmail  Handling. 

*PET  is  trademark  of  Commodore. 


Plug  in 
your  Printer 
PRINT 


AND 

with  one  of 

SPECTRUM'S 

EPSON  PRINTER 

PACKAGE 

DEALS 

Prr-^ne  Orciefs  ^//elcome 

Poymenl:  Sencl  CoshiersCfeck 

O'  Morif^v  Order  ond  we  Ji  sh 

iritfTiecfrai^JV 

Personal  checks:  Allnw  3  woaU' 

locfear 

Visa  and  Master  Card:  Include 

ail  nurriber'.o'^card 

Shippinig  Charge.  Add  Sb  to  to'ol 

MiChiQanre^rdentsoddJ*  '  StJl^S  'tjt 

Spectrum  Compulari 

26«18&ou1hli9fd  nm 

Lalhrup  Virioge.  Ml  44076 

[i131S59-52M 


Code 


2ft  9S 


Spectrums  Package  Deol 

133  m   S  761. 90 


""•'e'locm 
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The  following  method  might  not  work.  Why  not? 
310  SMALL  =  RND(l) 
320  BIG  =  RND(l) 

Exercise  4. 

(a)  7    (b)5    (c)0 
The  integer  part  of  .328904955  even  though 
it  isn't  printed. 

Exercise  5. 

(a)  2    (b)0    (c)7 
Exercise  6. 

(a)  220  PRINT  INT(2*RND(1)), 

(b)  220  PRINT  INT(6(RND(1)), 

(c)  220  PRINT  INT(I00*RND(1)), 

Exercise  7. 

(a)  220  PRINT  INT{2*RND(1))+  1, 

(b)  220  PRINT  INT(8*RND{1))+  1, 

(c)  220  PRINT  INT(100*RND{1)).+  1, 

(d)  220  PRINT  INT(2*RND(1))  +  2, 

(e)  220  PRINT  INT(3*RND(l))  +  3, 
(1)5,6,  7,  or  8 

(g)  2,  4,  or  6 

Exercise  8. 

430  IF  COIN  =  0  THEN  T  =  T+1 
440  IF  COIN  =  1  THEN  H  =  H  +  1 

Exercise  9. 

There  are  many  ways  to  write  this  program.  Here 

are  two  ways. 


100  REM---COIN  FLIPPER  dt 


210 
220 

410 

420 
430 

440 
450 
460 
470 

480 
490 


REM"""FIND  OUT  HOW  MANY  FLIPS 

PRINT  "  CCLR]"  ; 

INPUT  "HOW  MANY  COIN  FLIPS"  ;  N 


REM"""FLIP  TWO  COINS  N  TIMES 
FOR  K  =  1  TO  N 


CI 
C2 


[NTC2-RNDC155 

INTC2-RNDC1)) 


IF  CI  =  1  AND  Zl  -  1  THEN  PRINT  "HH" 

IF  CI  =  1  AND  C2  =  0  THEN  PRINT  "HT" 

IF  CI  =  0  AND  C2  =  1  THEN  PRINT  "TH" 

IF  CI  =  0  AND  C2  =  0  THEN  PRINT  "TT" 

NEXT  ,< 
PRINT 


999  END 


100  REH"""COJN  FLIPPER  ■t4A 

110  ASC0)="TT"  :  A$CO="TH"  ;  ASC2)="HT"  :  A$C3)="HH" 

200  REM---FIND  OUT  HOW  MANY  FLIPS 

210  PRINT  "  CCLR:"  ; 

220  INPUT  "HOW  MANY  FLIPS"  ;  N 

400  REM«""FLIP  TWO  COINS  N  TIMES 
410  FOR  K  =  1  TO  N 

420    CI  =  INTC2-RNDC1)) 
430    C2  =  INTC2-RNDC1)) 

440    PRINT  ASCZ-Cl  +  C2) 

450  NEXT  K 
460  PRINT 

999    END 

Exercise  10. 

We  did  it  by  modifying  our  first  program  of  Exer- 
cise 9.  Make  these  changes  and  additions  to  COIN 
FLIPPER  4. 

100  REM"""COIN  FLIPPER  #5 

300  REM"""5eT  FLIP  COUNTERS  TO  ZERO 
310  HH  =  0 
520  HT  =  0 
3  30  TH  =  0 
340  TT  =  0 

440  IF  CI  =  1  AND  C2  =  1  THEN  HH  =  HH  +  1 

450  IF  CI  =  1  AND  C2  =  0  THEN  HT  =  HT  +  1 

460  IF  CI  =  0  AND  C2  =  1  THEN  TH  -  TH  +  1 

470  IF  CI  =  0  AND  C2  =  0  THEN  TT  =  TT  +  1 

500  REM---PRINT  RESULTS  OF  N  FLIPS 

510  PRINT  "OUTCOME",  "NUMBER  OF  TIMES" 

520  PRINT  "  HH     ",  HH 

530  PRINT  "  HT     ",  HT 

540  PRINT  "  TH     ",  TH 

550  PRINT  "  TT     ",  TT 

Exercise  1 1 . 

Program  to  roll  two  dice,  N  times. 

100  REH"""DICE  ROLLER  S2 

200  R£M"""FIND  OUT  HOW  MANY  ROLLS 

210  PRINT  "  CCLR:  "  ; 

220  INPUT  "HOW  MANY  DICE  ROLLS"  ;  N 

400  REM---ROLL  TWO  DICE  N  TIMES 

1*10  FOR  K  =  1  TO  N 

420    Dl  =  INTCe-RNDCi:))  +  1 

430    D2  =  INTC6-RNDC05  +  1 

440    SUM  =  01  +  D2 

450    PRINT  SUM, 

460  NEXT  K 

470  PRINT 

999  END 

Exercises  12  and  13. 

OUTCOME      NUMBER  OF  WAYS         PROPORTION 


2 

3 

4 

5 

6 

7 

8 

9 

10 

11 

12 


1 

2 
3 
4 
5 
6 
9 
4 
3 
2 
1 


1/36  = 

.0278 

2/36  = 

.0556 

3/36  = 

.0833 

4/36  = 

.1111 

5/36  = 

.1389 

6/36  = 

.1667 

5/36  = 

.1389 

4/36  = 

.1111 

3/36  = 

.0833 

2/36  = 

.0556 

1/36  = 

.0278 
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Now  The  PET's  Know  How  To  Share 

MUPET  MULTIUSER  SYSTEM 


EDUCATION 

*  allows  direct  access  to  any 
programmes  or  data  files 

*  reduces  media  cost  •  one  set 
of  disks  needed  for  up  to  8 
users 

*  disk  based  languages  such 
as  Assembler,  Pascal,  Word 
Processing,  available  to  all 
users 

BUSINESS 

*  true  multi-station 
wordprocessing  with  access 
to  common  data  files 

*  cost  per  station  drastically 
reduced 

*  printer  spooling  is 
supported 

MANUFACTURING 

*  using  optional  DOCJBLE 
MUPET,  both  local  and 
common  IEEE  devices  are 
supported 

*  test  equipment  can  be 
controlled  locally,  while 
reports  and  programmes  are 
managed  universally 


MUPET 

USES 

NO 

NOME 

NOT  ANY 

NOT  ONE  BYTE 

OF 
SOFTWARE 


YOU  CAN  RUN 

ANY  COMBINATION 

OF  PROGRAMMES 

OR  LANGUAGES 

AT  THE  SAME  TIME 

•  word  processing 

•  Pascal 

•  Assembler 

•  Future??? 


MUPET  supports  any 
combination  of  CBM 
hardware  —  present  or 
future  —  which  supports  the 
IEEE  bus 

MUPET  plugs  in  externally. 
No  need  to  open  the 
PET/CBM  cabinet 

MUPET  supports  all  existing 
and  future  CBM  disk  based 
software 

MUPET  supports  printers  as 
well  as  disks 

MUPET  supports  all 
versions  of  Commodore 
Basic 


PET/CBM  Tcademarkof 
Commodcxe  Business  Mochiries 


CM3 

CANADIAN  MICRO  DISTRIBUTORS  LTD. 

J65  Miin  Sireet,  Millon.  Onliinri  L«IT  rP7  .  J16  878-7277 
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Exercise  14. 

In  this  program,  we  use  FREQUENCY  to  mean 
NUMBER  OF  TIMES. 


1(J0  REH"""DICE  ROLLER  «3 

200    REM"""FIND  OUT  HOW  MANY  POLLS 

210  PRINT  "  ELRJ  "  ; 

220  INPUT  "HOW  MANY  ROLLS"  ;  N 

300  REM---SET  OUTCOME  COUNTS 

310  DIM  P(;i2> 

3  20  POR  X  -  2  TO  12 

TO  ZERO 

F(X)  will  be  the  number  of 
times  outcome  X  occurred. 

5't0  NEXT  X 

410  FOR  K  =  1  TO  N 

ll20    Dl  =  INTC6-RNDC1))  +  1 

1*30    D2  ::  !NTC6"RND(  1))  +  1  X  IS  sum  of  two  dice,  Dl  and  D  2 

t50    PCX)  =  PCX)  +  l-« 

Increase  count  for  outcome  X  by  1 

460  NEXT  K 

500  REM""::PRINT  COUNTS  AND  PROPORTIONS 

510  PRINT 

520  PRINT  "OUTCOME,  "FREQUENCY",  "PROPORTION" 

530  PRINT 

540  FOR  X  =  2  TO  12 

550    PRINT  X,  PCX),  PCX)/N 

560  NEXT  X 

999    END 

Exercise  15. 

Since  we  had  to  roll  three  dice  six  times,  we  used  a 
subroutine  to  roll  the  dice. 


100  REM"""CREATE  AN  ADVENTURER 
110  PRINT  "  ELRD"  ; 

200  REM---ROLL  =  SUM  OF  THREE  DICE 


210 

GOSUB  310 

PRINT  "STR",  ROLL 

220 

GOSUB  310 

PRINT  "IQ",  ROLL 

230 

GOSUB  310 

PRINT  "LK",  ROLL 

240 

GOSUB  310 

PRINT  "CON",  ROLL 

250 

GOSUB  310 

PRINT  "DEX",  ROLL 

260 

GOSUB  310 

PRINT  "CHR",  ROLL 

270 

STOP 

300 

REM==""SUBR( 

)UTINE  TO  ROLL  3  Dl 

310 

Dl  =  INTC6" 

:RNDC1>:  +  1 

J20 

D2  -    iNTC6 

:rNDC1))  +  1 

330 

D3  =  !NTC5 

:RND(0)  +  1 

340 

ROLL  =  Dl 

^  Dl  +  D3 

350 

RETURN 

999  END 

Exercises  16  and  17. 

We  would  like  to  see  j^owrsolutions.  Please  send  them 
to  DragonQuest,  P.O.  Box  310,  Menio  Park,  CA 
94025. 


Software  Specialists  •  Science  and  Education 

fe        MICROPHYS 


PROGRAMS 


APPLE 

O 


PET 

Microphys  is  pleased  to  announce  the  availability 
of  its  educational  software  for  use  witti  the  Com- 
modore PET/CBM  and  APPLE/Bell  S.  Howell 
microcomputers.  Over  180  programs  have  been 
successfully  employed  in  Chemistry,  Physics, 
Calculus,  Mathematics,  English  Vocabulary  and 
Spelling  classes  on  both  the  high  school  and 
college  levels. 

The  programs  are  supplied  on  C-10  cassettes  and 
are  accompanied  by  complete  instructions.  Each 
cassette  retails  for  $20  and  may  be  obtained  direc- 
tly from  Microphys. 

For  those  using  disk  drivers,  the  programs  have 
been  coherently  grouped  on  diskettes.  Educationally- 
oriented  word  game  programs  such  as  ANAGRAMS, 
WHEELS  OF  FORTUNE  and  CRYPTO,  are  also  avail- 
able 

Educators  are  invited  to  send  for  our  educational 
catalog  describing  over  180  programs  now 
available  for  use  on  the  PET/CBM  and  APPLE/Bell 
&  Howell  microsystems. 

MICROPHYS  PROGRAMS 

2048  Ford  Street  •  Brooklyn,  N.Y.  11229  U.S.A. 

(212)646-0140 

U.K.  &  European  Dealer  Inquires  Welcomed! 


New  PACKAGED  PROGRAMS 


CASCADE  COMPUTER  WARE  PRO- 
GRAMS are  designed  lo  increase  your 
satisfaction  and  utilization  of  your 
Commodore  Computer.  Our 
professional  programmers  fiave 
created  new  programs  for  BUSINESS 
ENTERTAIN filENT,  EDUCATION,  and 
STATISTICAL  applications.  Write  for 
detailed  information: 

CASCADE  COMPUTERWARE  CO.,  P.O.  BOX  2354,  EVERETT,  WA  98203 

Dealer  inquiries  imiled  f?06J  355-6127 
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DYNACOMP 

Quality  software  for^ : 


ATARI 

PET 

APPLE  II  Plus 


TRS-80  (Level  II)* 
NORTH  STAR 
CP/M  8"  Disk 


GAMES,  SIMULATIONS,  EDUCATION  and 
MISCELLANEOUS 

BAibO£  7.P  <Aval:t]ib)«  lor  rII  compatm)  Prin:  SiT.9SOM*iiM'm  .95  DWriir 

An  ill  iiKliUVv<  ^CTHrn  at  \h\v  iroil  g>«iciuliir  cictt-i  |in*i  T*>i.l  pfiiciim  (utTi  bitn  afuJ  PtAYS  nihtt  <qnrTt(T  or  dupliiiiK  tvijpt 
[hir>ci»dir|  on  \ht  n>rlrKt.  fouf  cwnpuKf  £)|h|iofi«nh  mil  riiW  jijai  ItvoffnucOfl  dflmv-  If  Tn>  b4  I'^a  Kifh.  ihc  rwtipJIiT  i>ill 
double  Koui  cwirwi'  JRIIKL  JO  pto^idi^  tiwlLniiitnc  mircjiinnifni  [«  nJvwKcd  pd^cfi  ind  ii  ui  cinlkni  kuiunj  lool  lai  iht 

HEARTS  l.S  (Atillible  for  ill  compulcn)  Priet:S!4.HC>Mr(ir^Stt.«  Ubkciir 

Ar  euiiiJtf  uii3  «riE<i[iirijii|(>^inpiji:ii  vnMonDrnhiipQpiLlid  urdfiRK  Mntiiu  iiii]<k-<Hi«i(ntiUDc  mwhtcti  ibcpurpiHf  ■<  no!  lo 
iiVt  iry  ham.  or  iht  qucsn  of  i[udM   PUj  jiaiAii  I>d  camtniin  DrpoMTii)  "hp  »rt  ifrurf  *iifi  hitd-t0-tK»i  pLatin*  uiiLc[in 


CRIfibAGi:  Crh$-»0  only  I 
Thii  ii  !iTTipl]f  iKc  t>cM  cribb*|c|j] 
ki  Tcii  thr  no'ltc  intMri  lit 


'.   Itir  ir 


Prtn:  SM.H  CuMltt/Sll.M  Uhkrlit 

mbluif  pti;ri  in  uuch  a(  «  i»nini|  opporrrH  (i  «f]l 
nnt'lr  Iin(u4fr  ipuiirkci  prL^xik  Tipiil  cirtutiun 

Prt«;  $11, »S  C*Mitlt*/il5.W  [lUhf  Ik 

It  m  lira*  ind  fnulandlhc  EOmpvirr]  tti  pn«h*l)'C>a  kt    Fhr 


STUD  POKER  (ATARI  only) 

Thii  Ii  iSe  cliiiif  ^'''I'^i'  >  «i ''<'  ixrw.  r>rf  (i:iniruiti  ihali  Lhc  kaiili  unr 
tornpulei  ilori  i>ai  tbfti  taj  utui/J/  bni  thtodJi  Itawcxi,  it  lamtiim 
Irt  f^f^tam    Thii  lUL-kafc  wilJ  lun  jin  a  iUC  ATAHI    Colof,  |rftc>hu» 

POKER  PARTV  (A*»Hibk  for  ill  compuitn)  pri«:  S17,95  Cwww/Sll.W  nbUntr 

POPLEH  PARTY  ti  i  dii*  pokrr  iLJiiu,Ua«ML  l*i*d  on  Ihc  book.  ?OKF  «.  tT,  0»-*ld  J»«ih.  T>->  ii  ihc  ft>W  t»mpirhmij'^  tcruM 
tiSLLirhk  roi  FEiciOtam-niicfi  TTl*  pari;  n«uili  dF  rauri^il  (Bij  hi.  Mtwl  (ccqT^lCTI  pUyo^.  EadB  o!  Ih^  pUio-t  (jou  '""U  I<1  ■* 
lno»  Ibon)  tut  i  diricrml  pnuHuLlr  m  ihf  r«fn  of  J  «ir|nnj,  pfDpcruity  to  HoTf  of  fttkj  iisder  ptHbiit.  PfMliti  »rih  FTlkES 
PAKT>  brfprr  K"n|  la  ih»i  ttpcnti^r  |*mr  IWii(lin  Appte  CuMtK  and  ditkeilt  muom  oaiuui  ^  32  k  |«  Laifnli  Applf  11 

NOMINOES  JIGSAW  (AUH,  Apple  Knd  TR.S-$0  oa|) )  Prtn:  Slt.H  Cmrtlr/SU.H  DUjitt 

A  gii,u*i  puivlr  on  your  ^(HocHiifr^  Cpmpklt  ih*  ?ujih  b*  Mhclinf  jihti  pi«t«f  (rom  t  UUt  <iVibi,liA|  di  tit  iii^rlrrJl  i>Mtn 
WtMtfiOES  JICSAWm  kirtuDw  p Dtiunminf  rfTiHi  tW  trir^ici  iii  iu(nlaii>T  ubI  [he  pwiWwU  chulbcnio-M  itilt  i|)  ihm 
W\t\\  of  djrrmih)!    Sf«int  II  tuuiJ  upon  \i*  hunUHi  i)(  tunin  lakn  u^l  t>T  ihr  iitttnXiy  pF  Ihr  bowd  Mt'vp 

CRANSTON  MANOR  ADVENTURE  (North  Slir  only)  prin:  EIB.H 

A[  Um'   a  ctynptElMnit'T  Advcnunf  tUM   Im   Ihi   ^4(H1S   &laf     CItANSrON  MANOR   ADVtNTUItt  U^«  ihmi  la  mixinKml 

("BASSTON  MAIWR  »(i«*  rou  uitrnfrt  in  lAihcr  labubut  irnttiin  Lnrlinf  in  tl^  innor «rc  »ild  uiinuli  ichi  toftoii  ».rio  oill  n« 

jj<r  uplKc  ErfuyrnBiirHiLiI  a,  ^iSb  Tht  ni^mbrT  a(  IVCfflt  nfTTIIcr  ind  ItK  u»cu9cd4Qcnp<.k)[U  ucnticb  moic  eLibi^fiut  ihtn  lh« 
cuirml  inciuidi'  mm  of  Aiticntuic  pia|>«ni1.  Tinkinp  Ihii  finir  iBk  !op  In  ill  clui.  PUlr  CM  b«  tictfiptd  11  *fl)  lUke  and  IH*  ilaliii 
VOTnJ  on  diilitiic.  fIrq,uiT«  JIK. 

VALDEZ  (Ai-tiliblc  Tpr  ill  compiiltra)  Prin:  JW.95  CMnellt^ilS.W  Diihetl* 

A  iimutilKFr  oT  lurmanlo-  na.iiilion  Pnih*  Pnnrt  Wllllim  SoMruf  lIKl  Valdei  Nirri>-,(  The  riittrifn  utn  an  (ili^mr  M&\1_H.  ilr 
mml  raJfr  m^riindanpFoyirhlrlliialrnWkhcililiipmiMfiwtndlidalEttlltdlit  (.1^n  icuiOvniourw  thicuih  itiip  *nJ  Kctmi  lial 
ri7.  Anv  lilindiird  lirmaniJ  ini>  be  uwd  lor  diirlil^ 

FLIGHT  .SIMULATOR  (AvilUblf  for  «II  compulfn)  Prtc*:  SlT.»i.«»»iif/Sll  W  Utaktti* 

A  iraJiilhi:  arvl  rilrrirvf  ipi4lhtTq«I|<(3  imiulllKVI  orilll-citl.  fllltlE  uvi  UMitif  Pit  proirirn  ulilij«t  j«rwJiii.ailku  rqiialiDr.\  andlhc 
(fiii«i.irriiiiini>ri.  itti  tMta\  VEHi»n  pfurrm  InurucTHni  api^kukhti  irid  na>i|ali.Tii  uiini  rnlialiii  and  tnrnjuLi  h<|Jiiit>  Thr  Fnior 
hJiindcd  Hyfi  can  tXia  per laiin  l(Mp«,  htlTirilli  ^and  iimiUr  »fiotiii|ic  iruirinivfi 

KtAtlTREK  ),2  (Avillnbk  fpr  ill  compulen)  Prin:  S  ¥.9}Cu>«ir./itJ,K  PbAriir 

ThLi  Ii  the  cliiiic  StLirek  ijmuUiicin.  bnji  -iih  «.nal  nn  fuiurn  Fw  ruunplt,  ilw  KlintOM  w*  iho«  it  i!>r  Lnirrpiitr  •iiIumi! 
•i»rrijp|  vhiSeilto  imckirii  ilarlum  in  othn  giuJianii  Thf  KJinroraiJH  IIlKk  "itli  bMhlij^t  ukd  hdvy  CTiiiurijAd  [nDni<i>h«j^ 
shmit-Thru1iijtjoDu>v:t^KBhrniheFni(traqKiibc7kirfi^b>lhrtctn>'»CTU[Kriin<3aMUbauSO.S.»rflTDird'Thh^ 

CH  tSS  MASTER  (Norfh  !»Ur  nod  TRS-SO  onl))  PriniSH-H  t-.au*iU/JI3.f?  |>itkfiH 

Ihii  itomptnc  l-nd  ■"Ct>  pv^rrNI  prtfrun  p<oti>iMi  fite  kk'tli  ot  f**i    ll  <^iL»hi  [aitiinf.  en  paiuni  fapt-virti  «nd  ghr  p(ntniMK>n  Cif 
raani   Ad4|i^l[TJl1>.i^K  b<iardPlJ>  hrpltMI  t^Foit  iritiiwi  vl  fiat.  EVTrmllmfilhf  n^nnntlpcnof  "t^>ck"  plllt    T, 
liofi  ipwd.  the  pfOfTMn  »  wTiit*n  >h  tomtit,  tj  lanfuajr  Vbt  WIITWABJ-  S^K  IAI,rSTScrCiliro»tiil>   Fu[l«rift>k 
!IM  THS'H  •ti'u[3A.  aiW  i>u  viiihi  of  alrlununiriK  diird*]  (it  pro^Kkd  iio  Kcomnodice  ^k^^lh  Sru  ui«i 


BLACK  HOLE  (Apple  oal}> 

Thii  u  uincilitic  iTtphtcil  iunuUikin  of  itit  fitoMcnIi  m 
tnicrtiad<&*Lniain,  foi  l  pKHIiHdiiRH.  anorKI  cknt'iD') 
tJui  Ihc  filial  dini,  ilaliayi  Ihr  gHobr.  ContiQl  of  ihr  (Ml 
KtFlcTat4or.  Tins  pruaFun  cmplfirii  III  Htii  |rltI^KI  and  i 


Prtn;  SU.*9  CtMtllc^ll.H  UUrUr 

cltrd  in  tl<F.(iir iObs«f iii3|  iblKk  holf  Kilhi  ipucT  F^obc  the  Dllijecl  ii  la 
iniiilbUck  !k4c.  Tluiikiobc  jiciiioicd  uriihoui  taaunt  u  n«*i  ih«uiaiKali| 
II  roIiUKaEly  iiniiiliied  J^inj  iklr  jcEi  fci  raivionjfkii  dwja  ihititirfi  Im 


Price:  SlV.H  CuMllr/SU.M  IHikdl* 

Apple  niH  rnull  in  >dll[firnl  xiiilintri|iign|  "hjpprnint" 
»lr<  jrd  uiindaiciitirli|hi  Tci  ihildrtn  ftmn  j.|r»  1 '  j  in 9 
dim«nutw  tdl^cuwoffOflipulcTimTducxImn    lti:|X;( 


HODGE  PODGE  (Appk  aaty,  48K  Inirpr  BA^tC) 

Lc!  McJtxiE  FOix.£bcyii«rchiii]-|b*bniiirr,  Piniiiiiin> 'keronyi 
rrl^iHHi^ihrlriier  finumbci'  ol  IhrchcK'n  keir  Tbrfir»fiiim't  fi|(Mi(i 
ItOlKii"  'mrKih  II  a. nun  inliirn4*lini  KKKmf  dtvjte  »hK:h  hin|i  k  i 
l^)p(it  iraiiiTn  *  iVf,  Arr'T  runmni  wuh  Irtrin  RA^K' 

TEACHER'S  PET  I  (AviJUbk  fur  ill  compulrn)  Pric«:  t  T.93  Ljm*IIp^S13.95  [Hilifllc 

Ihn  »  iltr  Tdii  uf  OvVAtOMi-'.  eilwwiwnil  (wVajn   himipil,  irirridfd  loi  pi*  wh.iol  i.>  tiidt  3,  TtAl  Hl-K'$l'l  I  rm'-Mki  |ht 
youni  uudrnl  mlh  cPLinqint  piKiKr.  letirr-tiwit  ihUdnJiJufi  «lkd  ihlrc  IrvrLii  of  niath  ikill  nnci^Ci^ 

SPACE  TILT  (Apple  oftlj  j  Prtc;  slft.»c*M*m/lH.M  Dkktiif 

L'vclhc  time  poJdln  Id  till  the  pEanrut  ihr  TV  Kicetl  lo 'Voll'j  b*ll  into  t  hole  inihe  utccn   Soijiul  um^rlr?  NdI  KriFtithr  huJrtm 
unallrr  inil  insaJJn'  A  6(iJt  in  iimcT  illciM  yoti  to  ntRHire  fOirt  t.kill  acain-tt  othm.  in  Ihu  lubit-fannicii  ikamn  jjimf 


MOVING  MAZE  (Appk  onl}» 

MOVING  Maze  eAi^tii  Lhr  ramn  paddln  hi  ttiit^i  ■  pM^  ftcxncHiH  udr  L^fi 
(af^  ralHl(rml|}  buiH  and  ii  cKnimuAFI)  hrinj  nwdified  ITw  objciilist  n  to- tin- 
Voiini  II  177  an  (H^pivd  i>in>r  indK.»i(>T.  \T>ii  Itirer  hull  ii-f  pl«T  air  [>ii>>'ikin] 

ALPHA  FLGHTEJt  lAlitJ  oalj) 

TaonctllMI  J.lil[ili«andaclK>n  puifi'^niuii^w'  ALfKA  IIUKD  H  i 
wviMoflhrfaliif  AlPHA  MM  »  m  Ihr  panhol  an  tlifn  UKl  ihiil 
JEUif  Ihr  H'rl'Xk  f^  |«  prfttrnii^ri^  mttn  difrnak  iJ^c  ItiiEKi  finj  w 


PrinrSlD^.H  CBnrt»/^l4.9S  IHikrIlf 

OlNe^hirf    llDonrt^ghciiuir  ndfiumiiallr 

lair  mfiPut  Imwhini.  [ot  hern  hii  hrl  »  ■•II 

Prin:  11(4.95  CuHlIf /SII.H  Dhkfllr 

ei  ^iCni  9A  diCiire^  lA*  alin  daiihipipa.uin|  thipiith  )iiti 
d  r«TlL;l-U'i  iH  frj  tnd  ihf  (»»nt  r*dic    Brth  %Kfv\  tr- 


INTRUDER  ALERT  (Anri  odI>) 

Thiina  fiv.  pai.-Ti;I  jijph^^  iirrv-fVKh  plKf^  touin 
.*ktirt!  tnda^c  ^L7«;Ed  to  deiiiic)  jou  Ji  ill  tau-i  \a 
»rr  provided   INTRUDER  aLEST  fequifn  *  ;o,mk 

GIANT  *jt.ALOM  (Aliri  only ) 


PfiM:  $14.«  C'uwiif /{»,«!  Phkrilf 

Iwniialh  oT  tfic  "[>iudil>r"h4>iRt.)iiH  HOtn  |Eip[ini.  T(M  droHlkhjt"!  bt*r\ 
I  mtnJ  TinlindTTOcT  fucrrihjp  to  CKnpc  v:lll  IhcplaAi.  Fivciorli  of  djffKsI:} 
umI  viI!  run  on  14K  itnttmt. 

l^rW:  $t<.9S  C^WtHf-f I9.*S  [Xtkcllc 
:^iitrBl-i>itKicilonpinei;|Uiuan[(rdAddA-ii^>i'LViVj<rTi|Kk|nr?«t(c4|ourpii}ithrournilikmirourwic^nM<i>n(or)yirhL^ 
,nj  tk»<d  jjm   ftioorf  fiMii  dillrrinl  lutri  nf  iltruMltn,  rm  apmn  Mhri  pUff't^w  >iflirl)  UVt  ptattn*  luH.  auiml  Ih.  i.lwl 
I  SL  At  CIM  .lit  tui^  nn  lliK  'k,Llrmi 


Prir»;S  ^.tSCuMH^/JllMnhlirltr 

^  tonn  KhiLh  \ut  tA  i^i  paiLcrni  aht  bjilg    IVi> 
rMi>rli/LfLg.  CRYSTALS  hai  bnn  uinl  >n  li^al 

PTiw:S9].H  CusrItc/SU.W  l>hkMi« 

1  ctUKfpl  ia  NTVIj  you  muit  bitr  ull  ^t  d(  a 
rl  I'D  fuElnrutiiiirlh^  Alan 'iiF(phiciripvt'4il|' 


Ci|. 

CRYSTALS  (ATARI  DDlj) 

A  unmw  ilfuiiihm  nnJomli  pritdutri  fii^iAiiifii  t'lp'iXN  il>ipU>i  aLiiimpirieJ  • 
t»o  pitifirn  itf  itic  umr,  and  iKr  cDmhinnl  nlfr^l  of  Ih*  iimiihI  xmJ  (raphla  ati  i 
•.int^  to  d«inh-inMi4itih«  Miund  and  ,ului  Fraiuir^  o(  ihe  Ann 

CHOMP-OTHELLO  (AlRri  only) 

t  H(JMP-l>THEI,l.o:  111  rcaEly  i^o  chilltPtifpi  tunifi  m  oiw  CHCJMP  ii  iimiiir 
i-.^'-lit.  t>L.T  a.nBd  lakia^  iric  pinuiii^  riorliiin  {nH(LLOit.lh«  pstpuLal  boafd  (amr 
It  r%  alu.  int  haid  !(i  bf*|'  Ihii  pifli|c  •1)]  run  on  i  Ihk.  •.i<iFm 

G AME^  PACK  I  4A*»lbbk  for  ill  cojnpwlcn)  Price:  ».«  c:uuii«/SU.9?  fHikrflr 

l.AMf».PAl  kl  LnriU.ri.lhrLliM^,.™pi^irr,*rTknc.f  at  A(  KJA(  k,  I  L  NAR  I  ANDtH.  t  HAI^.  HOUSER  Al  t .  SV-JI  I  H  jnJ 
mint    Ihfv'  (ITTr*  h+.r  ISfrn  ron>Nncd  IPM  our  Ui|r  f<iij|ians  tut  raw  in  UiKfinf    Thry  art  intfudualt)  ^-crttd  ti(  a  tonirni^i 

GAMES  PACK  H  (Avillibk  for  nil  compulcn)  Prkri  W.«  C»«cltr/llJ.»S  iHikciit 

{■AMLS  PAt  K  11  KkJudci  itse  J^mn  l  %KJ\  Mt.llTS.  till  In.  Alt  ^   OLUfV.  HFF.  M  UWPfS  and  MHft»    At  "Uh  t:.AMl.S 

PA(  k  I.  ;iii  iht  jartTf.  an  l>iaJeiJ  ii  o<k  {votiam  ai«i  air  lalird  lim  a  mmu 

<*  k.  pai  1'  W  or  mo-F  pci  ^otftm  .%hrn  ^<iy  im  hjj  a  U^  NAt  0"^^  LihUnrttoB  kv  ji*U  S§  »?• 

NORTH  STAR  SOFP*  ARE  EXCHANGE  (NsSfcl  LIBRARY  Pri«  $9.95  D*.krt,r 

[i\'.^iaMpL■u*d.ct,t■Jlr^i|^^^;U.   ..^umf  SVSl   l.futv    ^k-i  ul  lfM.*diartl«  B((«an  Dul^Sal^d.^,  .aJi^e  Pocil><  rJ<th**(»*.t 


Availability 


D1 NACDMP  tafipirc  Huippbed  i^ith  «Knplei«  docuneniaiiiOfi  cof  t4injr|  tkai  ciptvucioiu  and  eiamplfi.  Unlcii  atiieiviui{»(;iriri,a[l 
prcVUniitillfm  sdllun  lULprotruS  OtrmM;  IftortlATAtCl  Irquifnlak)  £mpl  nhor  nC^cd^rmpanBaEramiUMcDn  AlAkl.  PET. 
TkS-ta^Lnd  II;  and  Appk  lApftlnofllcmcltc  aad  dnkXtc  n  nil  ai  ISEoclll  Siti  unflr  dcnut)  IdouMrdcmitTionipaliairJdaknir  Addi. 
tonaJl).  moM  pirofiaint  can  hr  obtairiFd  on  Ujiufarfl  ||iM  rnmtl)  J"  CP'W  HopPT  *l*l  Tot  HrvrB»  (unaini  undr*  MBASIC 


BUSINESS  and  UTILITIES 


MAIL  LIST  2.2  <Appk.  Atirl  ind  North  Slir  dliktttc  ofllr)  Prin:  tM.<» 

rhiiiprotiiin  i«.unniit±h*d  in  imbiFitirio  itoce  1  rtukiiTLiTi  aumb<i  craddrnieiar  Mvdnk«n«  iniinimumef  ilOGp<i  duktiift  auite 

Ihaii  2200  Coa*  *'dDthblr  dnuily"  lyiJr^u!).  \ii  man^  fraluir^  hr^Etidr  alptubelK'ard  np  (odr  wilbng,  labri  pnnhjig.  mfr|iitjaE  lilnanJ 
a  unigiK-  lir>*pri(}  i«tin|  lautinr  »hich  rntitvn  fl'ifi  br  «  vifujiljy  Irrrulint  Mlwii«r  el  uwi  dcrmtd  mln  A  wt»  valuattc  Vf 
pram' 

FORM  LETTER  SYSTEM  <FLS)  (Appk  ibiI  North  Stir  dbkrllr  only)  Pri»:  Sll.H 

I.J1C  F15  lo  ctait  *«d  tdr!  lorm  Ififrti  »nd  *A4irw  hill  Fnim  kut'i  air  pio^BRd  b»  auronfaiKatl)-  invntint  rwh  addrm  inin  a 
r*r4ncTfnFfMd  poriton  of  ywa  Inir.  FLS  ii  (Mnptndy  (wnpviible  >iih  MAIL  L.irr  1.2.  ■'tich  may  be  lutdio  miiuir  |ixir  uddieii 


IL5af^d  MAIL  LIST  Urn 


ajUbh  a 


I  coTitHned  pKkaft  l«  M9  99 


PERSONAL  FINANCE  SYSTEM  (ATARI  only)  Prifr:  SM.«  DWtHk 

Pf^  u  a  iirkfJc  (hti  n^cnu  CMFcntrd  i-jnim  nxtipcicd  ?l  ]0profja>mdei4fiKdTO  otianiLK  and  iimplil)  y>\i:  priionalfinaiKn  f  eaium 
inchide  a  XX>  tj-anunkm  apacity-  lau  ifceu,  26  optuMul  uiet  «odA,  dau  iftrit^al  b)  nwuh,  code  or  pa}Ni  apiioeul  ;<fjji!in.|  iil 
irfiorls;  ehnlilM^  baiaAtiha.  &*r  iraph  plotlini,  alul  molt.  Aha  prmidn  wi  Ihr  doicttr  a.  ATARI  DO^  1. 


FINDIT  (Norib  Stironlj) 

Thii  a  a  thfee-iD-<iEie  prc^iaJii  Hbith 
ctjt|r|   f4javbni|  afid  KcfcrcAcr  (r| 

irr  M^nwd  bn  •  unil*  kf)»ofd  m  ( 


Prn:  Sl4.«S 

ifofmaitaflMMikiM*  fcr  kr^vwdiofthreflypei.'  Ptnooalitj^  bii  aaaHtpCeMBinef' 

W  ulKtri.  triMd  alCulU,  -tlf}   iTn  adAtiee  to  kiTmrd  WBchci.  IbRC  ajcNIIhilB]!.  an 

iicnalinntdi  an^  appotntmrrt  Har^hri  lor  Ihr  fonumntLal  irt^vdi    Rrfnoxr  rfturji 

irfrrrwiiri  t-mc  a  rhfw  knu^idi 


DFtLE  4NorTb  Siir  only)  Prti 

I>iii  hand)  profiam aUiiai  NoritiSlu  lueit  lo ouaiuajd. i  ifie^ialiMil  data  l)M«i>f  ail'filei  and  ptc>ttaJ^l. lU  tnrv^l  of  iliik 
•  l'Ia^l)  jtcjiTiLliln.   DFIl.E  iiuiji  to  kI  upaJ^d  uw.  It  wkll  «|aniir  rour  di&kt  to  jrovidr  rllLaml  k*:ahui|  Dflhrdniinl 


:  iif .« 


GRAFIX  (TRS-SO  only)  PjIm:  Sil.«  CHwiie  '$]&.»  tXikitci* 

Ttiii  uniqL>e  piofjxm  allovi  you  la  caul)  cicaic  j,rjphKi  diirctly  riotn  iPk  Icrboaid  Yau  "dn.^"  yojj'  fijure  uiini  thtpfofram'i  <t- 
IHtiiVCCurWif 'COfillQEl.  OnMltirfitUT'ciimatl^iM  liaulMTiatitajJ^apprndcd  t^TitiirSAStCpiDBTajnasailiJoiialulilr.  DitKj  "hap 
PIT  lacr  ■.  [Jtit  ll  m  ind  thai  ptipl  it  finm  youi  xtrufTani  giin|  J"K1NT  iW  Thu  ib  a  .Cfy  r»M  way  lo  rrnlr  »Bd  «vf  |raphk> 


TIDY  fTRS-SO  only) 

rtl^Y  n  an  a&^emblf  lan|uaxr  EH'Dfrajn 
ncvriuiiy  Npattf  trvd  RLMaik  Matcmtciii 
MfTurcanllV  favo  Drvc  loaded.  TinV  i 
rilJY! 


Price:  StO.«  Caaarilf  ^SM.H  DiiLrrcr 

•  hiih  alkaki  |-gu  Id  irnumbrr  llw  Imni  \B  your  BA^IC  pt^T4PI)  TIPl  Mta  irnw^n  nn 
The  tnull  It  i  [omp*ilrtf  BAS3Cproi,tani  which  uki  much  InkTDrmarf  ipacr  inde^rtulii^ 
^main%  in  iii<mi^r>:  you  mar  lo*d  any  nunt^i  ol  BASIC  piofiamt  ■mhovt  Sxtiri  lo  rrliCiad 


STATISTICS  and  ENGINEERING 


Price:  SI-i.KCuHii*  S1I.9J  Dbiriif 

ion  Ironi  rtHi)  Tniunpii  ind  rniJVfiBI  ilala  -hKh 
l>  inKWhed  firM  ird  Kn)r>d  drr.iiktivi  takulatipn 


DATA  SMOOTHER  4Nii1  iviilibh-  lor  ATARI) 

ThiJ  'ip«i;UIdJla,'U»00<lhint  ^0%taea»uj  be  uird  loiapHlli  daur  uirful  hiIdt 
ttt  eqitaJT?  'ipacrid  t>«C  iolt«ar«  Frfluin  cNMt  in  dcjJrt  and  ranp  of  fii,  at  » 
Alio  intl-uiM  it-aifionaiiiC  ploniBf  of  ihr  input  dan  and  inKKHhed  rnuliii 

FOURIER  ANALYZER  (AvaJliblr  for  ill  roniptilcn)  pri«;  5U.WC**«rt«H».»S  DMbrllr 

Uw  ihii  jwofiam  Eocuminr  Ihr  fintMcxr  tpr«lra>i^riiiTi.(irdduraut^>i  ti|.n*Eii.  Thr  proiram  IcaEurei  luEOimaTK'  icaLn|  and  p4oiiinf  of 
ifK  input  data  and  remlii.  F>rai:t]ci]  applKaticni  iikUdr  ihe  analruSi  of  conipliealMlfiiltdnt  in  luch  nddiaidrfiroriUi.Miainiurii.a 
tjoiu  and  bmukeu. 

TFA  (Traisfer  Fmctlon  Anftlyitr)  Pitor:  Sig.HCuwtlr/SU.V5  DUkellr 

1h.il  naipccial  lolrwaic  pack±|e  it'hjch  majr  btutediofhaluai*  itKiianirrr  (unciioriof  ijisicfni  inch  aitii-riacnEiLriniirid  rilirj^ih;' 
Eiimimnf  Iheii  rf:spcnie  to  PkiLud  inpijll.  TEA  ii  a  mMytu  nmlitHatHHi  ol  FOUKIER  AMAI.VZtS  and  (pnlaJii  in  cnimttrini 
isriewed  drtibrl  «niuik»i  ftrqumry  pktt  an  .HI  ai  lUia  rdiiini  (ratuw.  Whtf rai FOU RIt R  ANALYZ£R  ii  deiirrd  l<»f  rdiKiiional 
aiuJ  KimtiriE  uw.  TFA  »  an  rn|inerrini  ip<?l,  AfaiUblr  (oi  all  comptitnti. 

HARMONIC  ANALYZER  (Avilliblr  lor  ill  conpuUn)  PiW:  Sm.h  c*ufiK/lU.vS  Hhhtiir 

HARMONIC  ANALV^JiK  Aai  ilitutnrd  Int  the  upei^timn  analnui  dI  trpr<ihtr  *aTcI<nm^    FcaiL'ci  iPfludr  iSaia  Tilr  irnrpaimn. 

tdiiiiu  and  Liniafr  idimpl  an  aifXi  n  dai*  inj  iipiMiiLini  pI'Wiini-  Onr  pailKuUil)  untquc  fanhty  ll  ihai  ilM  mpui  data  rvrril  not  hr 

niually  ipatrd  o*  in  «ilrr.  The  piiun4l  data  ll  wrin]  and  a  rubii  ipEirK  intcipdliiKH  iiuMd  tociutcihcdaLJ  filciKiUirtdbr  l^«  FIT 

ilronilini. 

FULiRtLR  ANALYZER.  IFA  and  llARMil.NIC  ANAL  YZER  ma>  be  puiLha»d  totnhi-i  l(w  a  ciNnbijird  prur  of  iM  9\  [ihir*  lan 

•eitfilard  S!6.45  ft}undiskrfin] 

REGRESSION  I  (A^llbk  for  ill  compilltn)  Price:  S19.95  C*aeiie.'SU.99  Dbknit 

RrGRESSIONlaadAi4iwarideiEc^>onall!.muiriruor-diinrnuanaileau  H]u«ici '  potrnv^tal" nir<r  Tiunf  ptcfiam  Tmurnin 
ctatlc  vay  Iviffi  mLfuiacj-.  as  aui<maiK  dmicf  drrinvaaiion  opiKia.  an  f^iciiiivc  nirmal  Eibrary  of  Tutinf.  fiiiKitoni:  ditia  tdnint^ 
auiCffHtv:  daia  and  cjtvc  pistiinf:  a  uaiiujcaJ  anal|iii  iff  iiand^id  ilc>iaiM?fl,  c«rieUlionfa«frKimi.rt[.)and  much  more  In  addi 
tion.  FKi*  nti  mi)  bctficd  ikt-thoiji  FMnliHieit  Tbe  daia    RECREIi'fllON  ):»(TTlainl|r  ihr  nunrnlanc  prD|iun.|n  an)  lUi^  «n#l)iiii  ^o^ 

REGHEXSION  II IPA8AF1T)  IA»lIllbk  for  iJ]  conpnim)  Piice:  Sl«.« (HM^ir  S2J.*5  Dhkeiie 

PARAFIT  11  deujocd  to  handle  thiHe  i.'at«t  in  <>ll>.a  ihe  fiataiini'i  xlt  itntcditrd  (ptnuMr  nonbnnilTl  m  IN«  Fiirini  lun^iivn  IV 
LLier  unpl)  inicni  the  furifiKKul  lor  en,  Khludmi  th*  luiamciiTi.  lA|i*.  *-\7\.  ri^~  lai  CKf  iB4Hr  DA5K'  itairmcni  iiiiei  fia'a  and 
FMuJu  nuj  M  rruaitMblEd  alU  pLminJai  cilh  Rl'<^RF.VSinN  I    1  tr  BFt-IIF^I'DS  I  for  pofyttwnUI  fntini.  and  PAH  AJ  11  f<y  Ihovc 


MULTILINEAR  REGRESSION  IMLR>  (AvftlUbFr  [Or  ill  eomputrn) 


MLRiia  proFnuonaiuinKaiepafkair  Im  anaJy(in|da4l  iTli  cinliinillf  |-»oor 

in(  ih<  base  icgfciiicn  cakulaiion.  ihti  prtf|iam  alio  proMdci  eany  id  uiT'diti  i 

Hot.  in-  gwr  truf  mttfTWIt^'^  WluHOH  by  mm^rftf  vaJun  fOi  lhe  indtrmdi 

hmired  on||'  by  ibe  a'ajUMc  iukttkh-) 

Rt.l<RE5SIOFi  I.  II  and  MUl.riLINlAR  H]^(:H1l5.SKII<^ 

dukeiir^l 


Pri«;5W.»5C*««ll* 
fU.t$  DUrllc 
linearly  irvdcpeMlcnt  varLabki.  Beiidct  pfiforni' 
MCllafT.  tilncial  and  rriitmi  (DrurlHini.  Fn  addi 
iiabln.  TTvcnumbn  ol  lariaMr^  and-daia  niir  ii 


be  purchased  idtcihec  Tdt  Wt.i^  |i 


BASIC  SCIENTIFIC  SUBROLTINK.S,  Volumr  I  4Noi  ikkllibk  for  ATARD 

DVMACOMP  iMbcrxcluyii-TdJiuibuici  fOT  iPh  M)ri«.a(r  kfytd  li>lheltiig  BA^iC SiU^nJic Subrauiinn.  X^^lymrliy,  f   RiKld^rKhcl 
(«*  lhe  B>TE.'MtCrai.4lill  ad<efiiiea»ri>t  in  BVTf  maiaiin«,  January  !W!I  I,  Thrst  lut^vuiinn  hayr  b«n  aticiablcd  wior Jir«  ii> 
iha]i(rT.  Includr^  with  rath  cnllrttiini  ii  a  nifTVij  P"Of  fan"  *hi!h  trlr^li  and  dnrtoniLiUci  each  iribroiBJH. 
Dala  «n4  fBnegi»n  plMiini.  romptcr  ranaMa 


trflm 

DD  ri: 

Lhaplern  2  and  y     Da 

Cbtlnl 

DUn: 

LTiapln  *       Matin  a»<: 

(.Plktl 

auti. 

LTtapdni  )  and  «      Rai 

Pmrf*. 

[o-ktlHm       Jl-li  4S  Canr 

All  Ihin  CD 

VeIkri 

u-i  available  loi  S»  »! 

\\t  'J  pl«n 

teu  ll  a  mat  pan  dI  the  dnu 
M  po.r«f  aajhamllifif 

i  api^oiimaiiOM 


4  111  <i  Dinkctic 

>ihror  HiMtinl  amJ  U9  9!  Iihirc  diiLeiieil 

Fntalmn,  IHTHC  hHV't/n-  hNoalinn.    I'oihi 


k^kilable  IliHfa  UYNA(.I>MP  liw 


ROUTS  (AtailmUr  for  ill  fornpiilcnl 

|n«  nut^hftl.  ROOT'S  tinu-ltantOsiiJ)  det>nmiiHi aD iht 

cl  Ibc  priycfidii.  and  becajic  ihe  piivtduir  n  BrKalJ*! 


Pricv».«SCKieiie^(|J9$riMirilir 

IMioJ  iafni>]inolftial  haiiiri  rr*!  tocl Fk iciUv  Ihfrr  ii  fwimi  rm  Ihr  *r|rre 
thr  a^(ula<>  ii  antttiTly  '•rf-  (owJ   No  [Rit^  fueiuiare  iiifuirh]  Ji  ifl{^..i. 

.fhimiai  irij  tfie  rnidiiili  diipEj;ed 


Ordering  Information 


r  fm  I-  Hofifvy  diii  lIBM  l-ifrnaL 
iiipplKdAith  DtKor  RaSK' 

Deduct  \G%  when  ardeiing  3  or  more  profjiTHnis. 


AJdi:  M],(n!i^li«: 
'TRS  89  diilnin  ai 


mJcired.  tT'M.  MiifPWit  BASlCt 


■  ^|■^^A^OMP  p-f^r* 


r  drlj'Jrd  ^ixriplic-i 


DYNACOMP,  Inc. 

]427  Monroe  Avenue 

Rochester,  New  York  14618 

24  houE  mail  order  phone:  (7]6(586'7579 

Office  phone  <9AM-5PM  EST):  (7I6K42-8960 


I    Pf  I.    M-Clt  II.  TK-il 


tr>  ^Mk  Mair 


■r  rrr.i'fW  "Jiir  njrw  i 
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COMPUTEI 


May,  1981,  Issue  12. 


NEECO 


WHY  BUY  FROM  THE  BEST? 

Service. . .  Support. . . 
Software . . . 


CBM^"  8050  DUAL  DRIVE  FLOPPY  DISK 


The  CBM  8050  Dual  Drive  Floppy  Disk  in  an  enhanced  ver- 
sion of  the  inlelligent  CBM  2040  Disk  Drive.  The  CBM  8050 
has  all  of  the  features  of  the  CBW  2040,  and  provides  more 
powerful  software  capabilities,  as  well  as  nearly  one  meg- 
abyte of  online  storage  capacity.  The  CBM  8050  supplies 
relative  record  files  and  automatic  diskette  initialization.  It 
can  copy  all  the  files  from  one  diskette  to  another  without 
copying  unused  space.  The  CBM  8050  also  offers  improved 
error  recovery  and  the  ability  to  append  to  sequential  files. 

HARDWARE  SPECIFICATIONS    FIHMWAflE 

Dual  Drives  DOS  version  2,0 

Two  microprocessors  Sequential  file  manipulation 

974K  Bytes  storage  on  two  5.25" 

diskettes  (ss) 
Tracks  70 
Sectors  17-21 
Sofi  sector  format 
IEeE-4B8  interface 
Combination  power  (green)  and 

error  (red)  indicator  lights 
Drive  Activity  Indicator  lights 
Disk  Operating  System  Firmware  CBM  8050 

(12KROM)  Dual  Price  $1795 


Sequential  user  files 
Relative  record  files 
Append  to  sequential  files 
Improved  error  recovery 
Automatic  diskette  initialization 
Automatic  directory  search 
Command  parser  tor  syntax 
validation 
Program  load  and  save 


CBM^"  8000  SERIES  BUSINESS  COMPUTERS 

The  new  Commodore  8000  series  computers  offer  a  wide  screen 
display  to  show  you  up  to  80-character  lines  of  information.  Text 
editing  and  report  formatting  are  faster  and  easier  with  the  new 
wide-screen  display.  The  8000  series  also  provides  a  resident  Oper- 
ating System  with  expandeO  functional  capabilities.  You  can  use 
BASIC  on  the  8000  computers  in  both  interactive  and  program 
modes,  with  expanded  commands  and  functions  lor  arithmetic,  edit- 
ing, and  disk  file  management.  The  CBM  8000  series  computers  are 
ideally  suited  for  the  computing  needs  of  the  business  marketplace. 


SCREEN 

2000  character  display,  organized 

into  twenty-five 

eO-column  lines 
64  ASCII,  64  graphic  characters 
3x8  dot  matrix  characters 
Green  phosphor  screen 
Brightness  control 
Line  spacing:  1'/i  in  Text  Mode 

1  in  Graphics  Mode 
KEYBOARD 
73-k8y  typewriter  style  keyboard 

with  graphic  capabilities 
Repeat  key  functional  with 

all  keys 
MEMORY 
CBM  8016:  16K  (15359  net) 

random  access  memory  (RAW) 
CBM  3032:  32K  (31743  net) 

random  access  memory  (RAM) 
POWER  REQUIREMENTS 
Volts:  IIOV 
Cycles:  60  Hz 
Watts:  100 


SCREEN  EDITING 

CAPABILITIES 

Full  cursor  control  (up,  down, 

right,  left) 

Character  insert  and  delete 
Reverse  character  fields 
Overstriking 
Return  key  sends  entire  line  to 

CPU  regardless  of  cursor 

position 
INPUT/OUTPUT 
Parallel  port 
IEEE-488  bus 
2  cassette  ports 
Memory  and  I/O  expansion 

connectors 
FIRMWARE 
24K  or  ROM  contains: 

BASIC  (version  4  0)  with  direct 

(interactive)  and  indirect 

(program)  modes 
9-digit  floating  binary  arithmetic 
Tape  and  disk  file  handling 

software 


CBM  8032  Computer  $1795 


C8M 

PRODUCT  DESCRIPTION 

PRICE 

4018 

16K  RAM-Graphics(N)  or  Business(B) 

Keyboard 

$  995.00 

4032 

32K  RAM-Graphics(N)  or  Busines3(B) 

Keyboard 

$1295.00 

8032 

32K  RAM-80  Col.  Screen-Business 

Keyboard 

$1795.00 

4022 

Tractor  Feed  Printer 

$  795.00 

4040 

Dual  Floppy-343K-DOS  2.0 

$1295.00 

8050 

Dual  Floppy-974K-DOS  2.0 

$1795.00 

4010 

Voice  Synthesizer 

S  395.00 

8010 

aOOBaud  IEEE  Modem 

$  279.95 

C2N  Cassette 

External  Cassette  Drive 

$     95.00 

CBMto  IEEE 

CBM  to  1st  IEEE  Peripheral 

$    39.95 

IEEE  to  IEEE 

IEEE  to  2nd  IEEE  Peripheral 

$    49.95 

2.1  DOS 

DOS  Upgrade  for  2040 

$  100.00 

4.0  DOS 

0/S  Upgrade  for  40  Column  Computer 

$  100.00 

Word  Pro  4-1- 

Word  Processing  Software  used  w/8032  $  450.00  || 

'CBI^  is  a  registered  trademark  of  Commodore,  All  prices  and       || 

specifications  are  subject  lo  change  without  notice. 

Disk  Buffer  (4K  RAM) 


^  commodore 


NEECO 

679  HIGHLAND  AVE. 
NEEDHAM.  MA  02194 


NEECO  WILL  MATCH  ANY  ADVERTISED  PRICE  ON  CBM  EQUIPMENT. 


(617)449-1760 

Telex:  951021 


MON-FRI  9:00  -  5:00 
MnterCharge  and  VISA  Accepted  I 
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NEECO  announces  the  MIPLOT  Plotter  from  WATANABE 


MIPLOTWX4671 


CodXASCIII 

NWH 

Fur>ciion 

i 
1 
1 

Q 

DRAW 

Draw  4  jTFatqhi  lint-  lo  ilit-  0oinrifxK!if  ed  bv  stooriitfl  coordinaTftJ 

1 

RELATIVE  DRAW 

Ofawa  sr'd'ijii:   n  -  lu  Mi'  [Xi.ns  ioecrf  ed  bv  relaiivtcoordinatej. 

M 

MOVE 

MowewiTn  c^ri  .[.  ■  J  ir„;  [icmt  siwci!i«Jb¥  atMolute  coofdinales. 

R 

RELATIVE  MOVE 

MqMB  with  w'l  lin  ly  fi*-'  P(-itit  iiwcilietJbV'elatwBqoordinatEi 

L 

LINE  TYPE 

SpeCl'V  SOird  C  b'uXfn  l.ri*- 

B 

LINE  SCALE 

SlMcHv  the  pitch  of  a  bto^sn  liinf  ID  1  -  1 Z  7ininl 

X 

AXIS 

Draw  X  or  Y  ctwrdinjjie  axis 

H 

HOME 

Return  w  rhe  origin  with  tM  pen  up 

II 

U3 

5 

ALPHA  SCALE 

Sfl*cifv  t;horBcier  jij«  (1  ID  16  limej  bi*sii^  0  7mm  s  O.rlniml 

0 

ALPHA  HOT  ATE 

S0«cpfv  character  orientation,  (poor  directionsl 

P 

PRINT 

Draw  ASCII  code  characters. 

N 

MARK 

Draw  mark  cerriered  on  theoen  ii<jjition,  ISik  kmdsl 

•  26  cm  X  36  cm  Plotting  area 

•  .1  mm  Addressing  Resolution 

•  Full  ASCII  in  any  of  15  different 
character  sizes 

•  Uses  standard  felt  tip  pens 


«1 250.00* 

'Includes  interface  to  CBM,  Atari " ,  Apple,  or 
TRS«80*'.  Please  specily. 

Please  CALL  or  WRITE  for 
specifications  and  information. 

'^Atarl  is  a  registered  trademark 

**TRS»80  is  a  registered  trademarlt  of  Tandy  Corp. 


ORIGINAL  8K  PET  2001*  OWNERS  TAKE  NOTE! 


The  following  peripherals  and  accessories  are  IN  STOCK  AT  NEECO: 


1.  AXIOM  PRINTER 


•  Complete  PET  graphics 

•  Plug  compatible 

•  Electrostatic  paper 

•  40  or  80  columns 


^299.00 


2.  16  or  24K  EXPANDAMEM 


INTERNAL  MEMORY 
EXPANSION  UNIT 


Plug  compatible 

Dynamic  low  heat  memory    16K- ^299.00 

Proven  reliability  24K  -  *379.00 

No  adaptor  needed 


3.  FULL  SIZE  KEYBOARD 


f'lTiTit'j; 
»  I  r  t  t  »  5  T  t  ?   : 

f  r  T  ;  1 


•  Complete  PET  graphics 

•  Separate  keypad 

•  Plug  compatible 

•  With  cover 


$99.95 


NEECO 

879  HIGHLAND  AVE. 
NEEDHAM,  MA  02194 


NEW  ENGLAND  ELECTRONICS  CO.,  INC. 

"NEW  ENGLAND'S  Largest 

Computer  Showroom" 


(617)  449-1760 

MASTERCHARGE  OR  VISA  ACCEPTED 

TELEX  NUMBER  951021,  NEECO 

MON-FRI,  9:00-5:30.  E.S.T. 
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Land  of  the 
Lost 

A  Program  For  A 
Cassette  Filing 
System 

Steve  Michel 
Sterling,  IL  61081 

One  day  I  pushed  myself  back  from  the  green  glow 
of  the  PET  CRT  and  was  struck  by  a  fact  that  has 
been  apparent  to  my  family  (translated  here  as 
wife)  for  quite  some  time.  My  office  had  become  a 
jungle  of  little  white  plastic  cases. 

The  major  source  of  confusion  was  my  cassette 
fding  system.  I  HAD  NONE!!  There  were  some 
200  plus  programs  strewn  around  on  100  plus  C- 
10  cassettes.  (I  sdll  drool  over  ads  for  floppy  disk 
drives.)  The  disarray  of  cassettes  was  not  so  much  a 
bother  as  was  my  MTBF.  In  most  computer  circles 
that  stands  for  Mean  Time  Between  Failure.  In  my 
case  it  stood  for  Mean  Time  Between  Finding.  It 
usually  took  me  2-3  times  longer  to  find  a  particular 
program  than  it  did  to  LOAD  it.  I  decided  it  was  a 
case  of  survival  —  find  my  way  out  now  or  be 
forever  lost  among  those  sequential  magnetic  I/O 
storage  devices. 

The  ultimate  solution  was  two  pronged.  The 
first  step  was  to  place  each  program  into  one  of 
three  categories: 

1 )  EDUCATIONAL  - 1  teach  high  school 
science. 

2)  UTILITIES  -  renumber,  merger,  business 
applications 

3)  GAMES  -  Need  I  say  anything  here? 

These  classifications  covered  the  range  of  my 
programs  fairly  well. 

The  groups  were  then  placed  into  appro- 
priately labeled  boxes.  I  have  found  that  the  boxes 
used  to  package  those  self-adhesive  mailing  labels 
that  arrive  on  so  much  of  our  mail  are  an  ideal  size. 
They  are  exactly  the  right  width  and  will  hold 
about  15  cassettes.  I  get  my  boxes  from  a  local 
industry  that  sends  out  mass  mailings.  The  DP 
manager  was  more  than  happy  to  provide  the 
empty  boxes. 

The  last  step  in  finding  my  way  out  of  this 
"cassette  block"  was  to  devise  a  method  for  catalog- 
ing the  programs,  providing  a  short  description  oi 
each,  updating  these  as  necessary  and  producing  a 
final  hsting  of  the  library  contents.  This  effort 
resulted  in  the  following  program. 


I  tried  to  take  an  example  from  some  of  the 
larger  computer  systems  and  wrote  a  menu-driven 
program.  This  means  that  the  operator  is  given  a 
display  on  the  screen  which  lists  various  options 
that  can  be  selected  by  the  pressing  of  a  single  key. 
After  the  option  is  complete,  the  user  is  then 
returned  to  the  same  or  another  menu  to  make 
another  selection. 

...It  usually  took  me  2—3  times 

longer  to  find  o  particular  program 

ttian  it  did  to  LOAD  it... 


The  main  advantage  of  this  type  of  approach 
is  that  it  allows  people  with  little  or  no  computer 
experience  to  feel  comfortable  and  confident 
about  running  a  particular  job.  It  also  cuts  down 
on  the  chance  of  operator  error  because  of  the 
redticed  input  requirements. 

PROGRAM  DISSECTION: 

Variables  Used: 

E$,U$,G$    arrays  that  hold  program  names  and  the 

description  of  the  programs 
EX$    —  array  used  to  LOAD  and  SAVE  each  of  the 

individual  categories 
NM  holds  the  total  number  of  records  LOADED 

or  SAVED  in  each  category 
F    F  0- return  to  SAVE  MENU 

F   1  -  return  to  LOAD  MENU 

EN    numberof entrycurrently beingedited 

II    position  in  string  that  is  beinng entered  or 

edited 
EE,  EU,  EG   —  number  of  titles  entere^i  from  the  keyboard  for 

each  category 
LE,  LU,  LG   —  n  u  mber  o  f  titles  loaded  from  casseue  file  for 

each  category 
DN    — devise  number  on  which  final  printed  output 

will  appear 

Program  Segments: 

100   - —  sets  array  sizes 

105-1016  MAIN  MENU-listing  of  options 

\.  cTUcrdata  from  keyboard 

2.  save  data  file  to  cassette 

3.  load  data  file  from  cassette 

4.  print  listing  of  tides 

5.  edit  any  previously  entered  data 

6.  end  program 

2000-2136   EXCHANGE  ROUTlNE-this  routine  is  used 

just  prior  to  the  SAVE  routine  which  employs 
the  general  variable  EX$-each  category  is 
transferred  into  EX$  before  S.-WE-ing. 

3000-2136   SORT  ROUTINE-this  is  used  losort  each 

calcgory  beibre  il  is  saved  to  la])C.  It  is  a  quick 
son  taken  from  COMPUTE!,  issue  2,  pg.  12. 

4000-4391    EDIT  ROUTINE-this  section  allows  any  pre- 
viously entered  data  to  be  reviewed  or 
corrected, 

Il  displays  theentry  and  cursor  by  use  of  the 
cursor  left  and  cursor  right  keys.  Corrections 
are  made  by  typing  over  the  existing  entry.  No 
provisions  were  made  for  the  insertion  or 
deletion  of  characters. 


'ay,  1981,  Issue  12. 
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MICRO  MINI  COMPUTER  WORLD 

74  Roblnwood  Ave. 

Columbus.  Ohio  43213 

(614)  235-5813  or  235-6058 

PRESENTS 

BUSINESS  ENHANCEMENTS 

COMPUSERVICE  BUSINESS  SOFTWARE 

)or 

COMMODORE  AND  APPLE  COMPUTER  SYSTEMS 


B.E.C.  #3000  Series 

General  Ledger 

(Apple  II  &  CBM  2001/8032/2040) 

$150.00 

Accounis  Receivable 

(Apple  II  &  CBM  2001/8032/Z040) 

$150.00 

Payfoll 

(Apple  II  &  CBM  2001/8032/2040) 

St  50  00 

Invenlory 

(Apple  II  4  CBM  2001/8032/2040) 

$150.00 

Mail  Usi 

(Apple  II  &  CBM  2001/8032/2040) 

$150.00 

Job  Cost 

(Apple  II  &  CBM  2001/8032/2040) 

$150-00 

Accounis  Receivables 

(CBM  2001/8032/2040) 

$220.00 

wilh  Order  Entry 

ROM  Control  Chip  required  wilti  CBM  System 

$  70.00 

B.E.C.  #4000  Series  NEW  lor  8032/8050 

General  Ledger 

(CBM  8032/8050) 

$175,00 

Accounts  Receivables 

(CBM  8032/8050) 

$220,00 

with  Orcter  Entry 

Accounts  Payable 

(CBM  8032/8050) 

$175-00 

Payroll 

(CBM  8032/8050) 

$175.00 

Inventory 

(CBM  8032/8050) 

$150.00 

Mail  List 

(CBM  8D32/805O) 

$175.00 

Jot)  Costing 

(CBM  8032/8050) 

$150.00 

BOM  Control  Chip  required  with  CBM  System  $  70  DO 

Special  Offer,  buy  any  two  (2)  of  the  above  packages  and  receive  a  10%  dis- 
count oft  suggested  relail.  Offer  expires  1  July.  1981. 

Send  for  documentation  package  for  S20,  apply  this  amount  towards  your  first 
purchase  or  relurn  documenlation  in  re-saleable  condition  for  complete  refund. 

CALL  or  WRITE  lor  MMCWLs  FREE  CATALOG  ol  computer  producls. 

B  EC,  Software  is  Distributed  In  the  EasI  by  MICRO  MINI  COMPUTER 
WORLD  INC, 

Deafer  Inquiries  invited 


introducing 
THE  DOUGLAS  POINT  OF  SALE  SYSTEM 

The  DOUGLAS  POIIJT  OF  SALE  SYSTEM  is  a  data  processing  system  operating 
on  the  Commodore  Business  Machines  8032  or  2001  (with  BASIC  4.0  ROM's 
installed),  and  the  8050  megabyte  disk  computing  equipment.  The  standard 
business  keyboard  is  required  The  system  inlegrates  relail  sales  tacililies  and 
aclivities  with  Ifie  merchanlile  invenlory  to  provide  a  complete  "pointof-sale" 
data  processing  system  tor  the  retail  trade  establishment. 

The  DOUGLAS  POINT  OF  SALE  SYSTEM  supports: 

•  Major  requirements  of  the  retail  sale  transaction: 
Normal  ouf-ol-inventory  sales. 
fJon-inveotory  sales  such  as  inslallation  lees. 
Customer  returns. 

Down  payments  in  cash  or  in  used  equifinient. 
Cash  and  credit  transaclions. 
Provision  (or  tax  exempt  customers. 
Control  ol  loaned  inventory  Hems 
Sales  tax  compulations  for  sales  and  relurns 
Printed  receipts  with  company  name  and  receipt  number. 
Capability  lo  add  personalized  notes  on  each  receipt, 

•  Integration  of  sales  aclivity  with  inventory: 
Automatic  adjuslmeni  to  inventory  al  time  of  sale- 
Customer  relurns  posted  back  to  invenlory  al  lime  of  sale. 
Stock  replenishment  determined  at  lime  of  sale. 
Compiete  sales  history  captured  during  each  sale, 

Automated  processing  ol: 

Mail  lists  of  customer  and  distributor  addresses. 
Major  item  customer  inventory- 
Trade-in  acceptance  data  lor  used  inventory  repoft. 
The  invenlory  receiving  process  and  associated  reports. 
Service  and  maintenance  conttacts. 
Daily  sales  activity  report. 
File  purge  and  system  backup. 
Password  security  for  unattended  computer. 
Pricing  and  addressing  labels. 

DISTRIBUTED  BY: 


SUGGESTED  RETAIL  $750.00 


CALL  OR  SEND  FOR 
MMCWI  CATALOG 


DEALER  INQUIRIES  fNVITED 


,  COMPUTER  WORLD  inc 


<^* 


ct"" 


74  HOBINWOOO  AVE.    COLUMSUS.OHI0  43213 
(S14)  i35-S«13  (614)  235-60S« 


MICRO  MINI  COMPUTER  WORLD 

74  Robinwood  Ave.    Columbus,  Ohio  43213 

(614)  235-5813  or  235-6058 

PRESENTS 

THE  INTEGRATED  COMPUTER  TECHNOLOGIES 


Prloress-44  liiterr;al  Motherboard: 

The  ICT  P-44  IS  a  44  pin  internal  motherboard  that  facilitates  expansion  ol  your 
PET/CBM  within  the  PET  enclosure  The  Pfioress-44  is  lully  shielded  on  its  under- 
side by  a  massive  ground  plane.  The  connectors  utilize  any  standard  44  pin  edge 
card  (many  styles  are  available  from  Radio  Shack).  The  following  signals  comprise 
the  P-44  bus: 

•  +9v.  -9v.  +  16v.GND.lRQ,RES,NMI.RDY.B02, 

•  BA0-BA15.BD0-BD7.BR/W.BW/R,SEL8.SEL9,SELA  SELB 

•  DIAGNOSTIC  SENSE.SYWC  and  3  User  delinable. 
The  Priofess-44  is  currently  available  tor  the 
new  2000  and  4000  series,  and  is  under 
development  for  ihe  8000  series. 

All  ICT  cards  utilize  the  Prioress-44  bus. 

Price:  Prioress-44  with  one  conneclor  $7900 

Priores5-44  with  six  connectors  95  QO 

Each  additional  connector  4  QO 
(specify  when  ordering) 

The  \Ct  Ptogrammable  Character  Generator: 
The  ICT  Programmable  Character  Generator  is 
a  2K  RAM  replacement  for  the  PET/CBM 
Character  Generator  ROM-  The  device  allows 
the  user  to  reprogram  any  or  all  of  Ihe  256 
standard  PET  screen  characters  The  PCG  also 
tunctions  as  2K  bytes  of  RAM  in  Ihe 
S90ao-SBFFF  address  range. 

Uses  of  the  ICT  PCG: 

a)  Foreign  character  sets 

b)  Math.  Engineering  and  special  notations 

c)  Music  notation. 

d)  Flow  control  and  modeling. 


e)  Schematic  and  logic  symbols. 
I)  Character  oriented  game  symbols, 
g)  Architectural  Drawings. 


h)320Hx200V  BIT  GRAPHICS, 
i)  .    many,  many  more 


utilize  the  graphics  system  with  exireme  ease.  Software  is  provided  on  2040  tormal 
diskette  and  includes: 

a)  7  complete  2K  character  sets  (Russian.  Katakana-K). 

b)  Predelined  graphics  (including  the  Real-time  rotating  cube). 

c)  Development  Tools  including: 

Charenfy  ■  used  to  program  characters  in  an  8x8  matrix. 
Draw  -  a  program  Ihat  allows  drawing  in  a  320x200  area. 
Plot  -  two  versions.  x,y  plotting  in  the  320x200  matrix.  A  fast  assembler 

version  and  a  readable  BASIC  version. 
Screen  Dump  ■  an  assembler  program  to  dump  Ihe  EXACT  screen  contents 
lo  a  Commodore  2022  printer- 
Price:  PCG  with  2040  diskette  and  manual  $240.00 

Manual  alone 7.50 

The  ICT  HexROM: 

A  six  socket  programmable  ROM  board.  Any  three  ol  the  sockets  may  be  pro- 
grammed to  become  ROMs  at  S9000.  $9800.  $A000.  EA800.  SBOOO  and/or  SBBOO. 
A  simple  BASIC  POKE  equates  any  socket  to  any  ol  the  above  addresses. 

Pnce    HexflOM  and  manual .  S)  10.00 

OumHOM  (6  sockets  al  fixed  addresses! 69.00 

Ttie  ICT  EPROMer: 

The  EPROMer  will  READ/PROGRAM/VERIFY  Ihe  lollowing  EPROMs' 
2758.  2716,  2732  (24  pin  EPROMs)  and 
2764.  27128  (28  pin  EPROMs). 
To  a  maximum  ol  36  pin  1/0  (SV). 

The  sotlware  (wntlen  in  assembler)  will  support  Ihe  above  EPROM  types  and  also 
allow  the  user  lo  deline  any  new  EPROM  configurations  (5V  t/cc,  25V  Vpp). 

Price:  EPROMer,  sotlware  and  manual       ,.,,., 5180,00 

ICT  Producls  distributed  by  fvticro  Mini  Compuler  world  Inc. 

••*  Special  introductory  oiler  *** 

10°/i  oil  all  suggested  retail  prices 

(oiler  expires  July  1. 1981)  DEALER  INQUIRIES  INVITED 


The  PCG  has  an  empty  sockel  tor  the  original  PET/CBM  ROM   Wilh  the  provided 
external  switch.  RAM  or  ROM  may  be  selecled. 

ICT  provides  over  128K  of  software  and  data,  allowing  the  user  lo  immediately 
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5000-5331    ■ —  INPUT  ROUTINE-this  is  the  heart  of  the 

program.  It  provides  both  the  enter  data  and 
edit  data  function.  I  first  started  with  an 
INPUT  statement  here  but  it  wasn't  flexible 
enough  (or  I  wasn't  smart  enough)  to  accomo- 
date the  edit  function.  The  routine  gets  one 
character  at  a  lime,  checks  the  value  of  the 
character,  branches  to  appropriate  routines 
for  cursor  con  trol,  or  adds  the  character  to 
the  coirect  spot  in  the  input  string.  The  rou- 
tine wraps  around  both  forward  and  back- 
ward andallowsupto75charactersperentry. 
A  more  detailed  explanation  follows; 

5000    clears  keyboard  buffer  of  accidental 

keystrokes 

5010    prints  flashing  underline  cursor 

5015    get  keystroke 

5020    checks  for  cursor  left  key 

5025    increments  position  ofcursor  in  string 

5030    checks  for  cursor  right  key 

5040    checks  for  wrap  around  in  forward  direction 

5090-5100-  prints  character  on  screen  and  adds  it  to  the 
correct  position  in  the  string  being  entered  or 
edited 

5300-5330-  performs  cu  rsor  left  a  nd  reverse  wraparound 
10000-16031     -  ENTER  DATA  MENU 
19000-20121    -  SAVE  ROUTINE-saves  the  selected  group 
from  previously  saved  file.  Also  gives  mes- 
sages for  tape  handling. 
30000-32041    -  PRINT  ROUTlNE-prints  list  of  selected 

titles.  User  defines  whether  output  is  to  screen 
or  to  printer  in  lines  42000-42060.  Devise 
number4  for  printer,  3  for  screen.  The  out- 
put file  is  then  opened  to  the  correct  devise  in 
line  40075,  the  file  is  printed  and  then  closed 
in  4 1 002 .  Figure  1  shows  a  sample  of  the 
output. 

A  few  words  about  program  modifications.  The 
LOAD  and  SAVE  routines  should  be  easily  modi- 
fied to  accomodate  those  lucky  disk  users  out  there. 
I  strongly  recommend  that  all  REMs  be  omitted 
from  the  program  when  typing  in  because  they  take 
up  an  extra  2.5K  of  memory. 

Well,  that  is  the  way  it  works.  Some  corollary, 
somewhere,  must  say,  "It  always  looks  easier  after  its 
done."  At  this  point,  all  of  my  programs  are  neatly 
stacked  in  5  well  labeled  boxes,  every  program  has 
been  backed  up  on  a  master  tape,  every  program  has 
its  listing  filed  in  an  appropriate  folder  and  I  have 
an  alphabetical  list  and  description  of  every  pro- 
gram in  my  library.  It  feels  great  to  be  back  in  civili- 
zation again. 


5    REM  STEVE   MICHEL 

10    REM  STERLING    HIGH    SCHOOL 

15    REM  STERLING    IL         61081 

20    REM 

100    DIMG$(150),E$(15O) ,U5 (150 ) , EX$ (150) 
105    PRINT"Fi^i^  rMAIN   MENUf^^^" 

110    PRINT"rlf  .CENTER   DATA  x2f.    -• 

-.SAVE    FILE" 

112  PRINT "\^r3r.    LOAD    FILE  x4r.    -. 

-.PRINT    LIST" 

113  PRINT"^^x5f.    EDIT   TITLES  Jl6f.    -■ 

-,END    PROGRAM" 

115  GETA$ : IFA$=" "THENGOSUB1000 :G0T0115 

116  A=VAL(A$) 


120  ONAGOTO10000, 19000, 30000, 40000, 4000, 

-.18000 
125  G0T0115 
1000  TT=TT+1 

1002  IFTT/2=INTCTT/2)THENR$="j:":GOTO1010 
1005  R$="f" 
1010  PRINT"Mi)'^^i^iJ"Jf^^^t^i^t  -1 

-.";R$;  "ENTER  CHOICE" 
1015  FORJ=1TO500:NEXTJ: RETURN 
2000  A=VAL{A$) :ONAGOTO2010, 2020, 2030 
2010  F0RJ=1T0NM:EX$(J)=E$(J) :KEXTJ: 

-.GOSUB3000  :F0RJ=1T0NM:E$(J)=EX$  (J)  ; 

-.NEXTJ 
2015  GOTO2100 
2020  F0RJ=1T0NM:EX$(J)=U$(J) :NEXTJ: 

-.GOSUB3000  :F0RJ=1T0NM:  U$  ( J)  =EX$  ( J)  : 

-.NEXTJ 
2025  GOTO2100 
2030  F0RJ=1T0NM:EX$(J)=G$(J) :NEXTJ: 

-.GOSUB3000:FORJ=1TONM:G$(J)=EX${J)  : 

-.NEXTJ 
2100  PRINT"fiT^;^   REWIND  DATA  TAPE  -. 

-nr";NM$"f." 

2105  PRINT"^'!   PRESS  '*'  TO  RETURN  TO  i 

-iMENU." 
2110  PRINT"T^t   PRESS  ANY  KEY  WHEN  DONE." 
2120  GETA$:IFA$=""THEN2120 
2130  IFA$="*"THEN1FF=0THEN19000 

2133  IFA$="*"THENIFF=1THENF=0:GOTO3000O 

2134  IFF=1THENF=0:GOTO31000 

2135  GOTO20020 

3000  PRINT"Ri^^NOW  SORTING  ";NM$;"  -. 

-.PROGRAMS." 
3100  TP=1 : LOWER ( 1 ) =1 : UPPER ( 1 ) =NM 
3120  IFTP<=0THENRETURN 

3140  LB=LOWER(TP) : UB=UPPER(TP) :TP=TP-1 
3160  IFUB<=LBTHEN3120 
3180  I=LB:J=UB:TEMP$=EX$(I) 
3200  IFJ<1THEN3260 
3220  IFTEMP$>=EX$(J)THEN3260 
3240  J=J-1:GOTO3200 

3260  IFJ<=ITHENEX${I)=TEMP$:GOTO34  00 
3280  EX$(I)=EX$(J) :I=I+1 
3300  IFI>NMTHEN3360 
3320  IFEX${I) >=TEMP$THBN3360 
3340  1=1+1 :GOTO3300 
3360  IFJ>ITHENEX$(J)=EX$(I) :J=J-1: 

-.GOTO3220 
3380  EX$(J)=TEMP$:I=J 
3400  TP=TP+1 
3420  rFI-LB<UB-ITHENLOWER(TP)=I+l: 

-iUPPER(TP)=UB:UB=I-l:GOTO3160 
3440  LOWER (TP)=LB: UPPER (TP)=I-1:LB=I+1 
3460  GOTO3160 

4000  PRINT"fii^^^         jiEDIT  FILE  MENUr" 
4010  PRINT"^T^EDIT  WHICH  SET  OF  PROGRAM  -. 

-.TITLES?" 
4020  PRINT"^rlf.  EDUCATIONAL      X.2f.  -. 

-^UTILITIES" 
4030  PRINT"i|'x3r.  GAMES  x4r.  -. 

-.MAIN  MENU" 
4050  GETA$:IFA$=""THENGOSUB1000:GOTO4050 
4060  A=VAL(A$) 

4070  ONAGOTO4100, 4200, 4300, 105 
4080  GOTO4050 
4100  PRI NT "I^l^^^' WHICH  EDUCATIONAL  TITLE  -. 

-.TO  EDIT  ?" 
4110  INPUT"NUHBER";EN 
4115  PRINT"fi     15     10    15    20    - 

-.25    30    35" 
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INTRODUCING 

COGNIVOX  Series  VlO-1000 

A  Revolutionary  New 

Voice  Input  and  Output  Peripheral 


=^ 


High  Fidelity  Voice  Response 
Industrial  Quality  Recognition 

PET  —  AIM-65  —  APPLE  n 

COGNIVOX  series  VIO-1000  is  a  top-of-the-line  voice  I/O 
peripheral  for  business  and  educational  applications  and  the 
demanding  hobbyist. 

It  can  be  trained  to  recognize  words  or  sliort  ptirases  drawn 
Irom  a  vocabulary  of  32  entries  clnosen  by  ttie  user.  It  will  talk 
back  with  up  to  32  wordsor  short  phrases.  In  disk  based  systems, 
response  vocabularies  can  be  stored  on  the  disk  and  brought  to 
memory  as  needed,  giving  an  effectively  unlimited  number  of 
vocabular  y  entries.  The  quality  of  voice  response  is  excellent, 
and  it  IS  far  superior  to  that  ol  speech  synthesizers. 

COGNIVOX  series  1000  comes  complete  and  ready  to  plug 
into  your  computer  (the  computer  must  have  at  least  16K  of 
RAt\yi)-  It  connects  to  the  parallel  I/O  port  of  the  PET,  to  the  game 
paddle  connector  on  the  Apple  and  to  the  J1  port  on  the  AIM-65. 
Connectors  are  included  as  required.  Also  included  are  a 
microphone,  cassette  with  software  and  extensive  user  manual. 
A  built-in  speaker/amplifier  is  provided  as  well  as  a  jack  lor 
connecting  an  external  speaker  or  amplifier. 

Software  supplied  with  COGNIVOX  includes  two  voice 
operated,  talking  video  games,  VOTH  and  VOICETRAP.  These 
games  are  absolutely  captivating  to  play,  and  the  only  voice 
operated  talking  games  that  are  commercially  available- 
Adding  voice  I/O  to  your  own  programs  is  very  simple.  A  single 
statement  in  BASIC  is  all  that  is  required  to  say  or  to  recognize  a 
word.  Complete  instructions  on  how  to  do  it  are  provided  in  the 
manual. 

In  keeping  with  the  VOICETEKtraditionof  high  perlormance  at 
affordable  price,  we  have  priced  COGNIVOX  series  1000  at  the 
unbelievably  tow,  introductory  price  of  $249  (plus  $5  shipping  in 
the  US.  CA  add  6%  tax.  Foreign  orders  welcome,  add  10%  for 
handling  and  shipping  via  AIR  MAI  L).  When  ordering,  pleasegive 
the  make  and  model  of  your  computer,  the  amount  of  RAiyi  and 
whether  you  have  disks  or  not. 

In  addition  to  COGNIVOX  series  VIO-1000,  VOICETEK 
manufactures  a  complete  line  of  voice  I/O  peripherals  lor  most 
of  the  popular  personal  computers.  Speech  recognition-only 
peripherals  are  available  for  the  8K  PET  and  the  4K  AIM. 

For  more  information  call  us  at  805-685-1854  or  write  at  the 
address  below. 


Dealer  Inquiries  invited. 

VOICETEK 


DeptA,  P.O.  Box  388 
Goleta,  CA  93116 


w 


WORDPBOPACK  and  JINSAM  are  uacJemarks  d 
Jim  Wicro-Sysiens.  inc 
WordPro  IS  a  trademark  ol  Professional 
Safiwafe.  inc. 


"This  module 
is  much  more 
powerful  than 
you  can 
Imagine/' 

Robert  Baker, 
February,  '81  KILOBAUD 

With  WORDPROPACK, 
JINSAM's  WORDPRO 
interface,  you  obtain 
the  ultimate  "state  of 
the  art"  business  tool. 
And,  WORDPROPACK 
is  just  one  of  seven  ac- 
cessory nnoduies  and 
systems  available  with 
JINSAM  Data  Manager. 

JINSAM  is  Commodore 
approved.  JINSAM  is 
available  for  all  Com- 
modore 32K  microcom- 
puters. 

Send  only  $15  for  your 

own  84K  5  program 

demonstration  system 

or 

SEE  YOUR  NEAREST 

COMMODORE  DEALER 

FOR  A  DEMONSTRATION 

JINI  MICRO- 
SYSTEMS, INC. 

P.O.  Box  274  •  Riverdale,  N.Y.  10463 
PHONE:  (212)  796-6200 
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4120    PRINT"  ";LEFT$(E$(EN) ,35) 

4125  LR=LEN(E${EN)  )  :  IFLR>35THENPRINT"i^"  ; 

-.RIGHT$(E$(EN)  ,LR-35) 
4130  PRINT "iit^^it"^^HERE  IS  THE  LINE  AS  -. 

-.IT  EXISTS  NOW.  " 
4140  PRINT "ij'S  IMPLY  EDIT  OVER  THE  -. 

•^MI STAKES  AND" 
4150  PRINT"PRESS  RETURN  WHEN  DONE." 
4160  PRINT"h":PRINT"»»";  :B$=E?{EN)  : 

-.II=0:GOSUB5007:T$=B$ 

4170  PRm'r"h^H^HH'iH'^iT   that  correct  ■ 

-nNOW  r(Y  OR  N)  ?" 
4175  GETA$:IFA$=""THEN4175 
4180  IFA$="y"THENE$(EN)=T$:GOTO4000 
4185  IFA$="N"THEN4115 
4190  GOT04175 
4200  PRINT"Ri^^WHICH  UTILITY  TITLE  TO  -. 

-.EDIT  ?" 
4210  INPUT"NUMBER";EN 
4215  PRINT"fi     15     10    15    20    ■ 

-.25    30    35" 
4220  PRINT"     ";LEFT$(U$(EN) ,35) 
4225  LX=LEN(U5(EN) ) : IFLX>35THENPRINT"^ " ; 

-.RIGHT$(U$(EN)  ,LX-35) 
4230  PRINT "M'^'i'^^l^'^HERE  IS  THE  LINE  AS  -. 

-.IT  EXISTS  NOW.  " 
4240  PRINT"tSIMPLY  EDIT  OVER  THE  -. 

-.MISTAKES  AND" 
4250  PRIKT"PRESS  RETURN  WHEN  DONE." 
4260  PRINT"li":PRINT">»";  :B$=U$  (EN)  : 

-iII=0:GOSUB5007:T$=B$ 
4270  PRINT "h^ii^^i^tii^^i^i^Tt' IT  THAT  CORRECT  ■ 

-iNOW  X  ( Y  OR  N )  ?  " 
4275  GETA$:IFA$=""THEN4275 
4280  IFA$="Y"THENU$(EN)=T$:GOTO4000 
4285  IFA$="N"THEN4215 
4290  GOT04275 
4300  PRINT"fi^i^WHICH  GAME  TITLE  TO  EDIT  -. 

4310  INPUT"NUMBER";EN 

4315  PRINT"fi     15     10    15    20    - 

-.25    30    35" 
4320  PRINT"     ";LEFT$tG$(EN) ,35) 
4325  LR=LEN{G$(EN)  )  :  IFLR>35THENPRINT"i^"  ; 

-.RIGHT$  (G${EN)  ,LR-35) 
4330  PRINT "M^tti^tHERE  IS  THE  LINE  AS  -> 

-.IT  EXISTS  NOW.  " 
4340  PRINT"^^SIHPLY  EDIT  OVER  THE  -. 

-.MISTAKES  AND" 
4350  PRINT"PRESS  RETURN  WHEN  DONE." 
4360  PRINT"li":PRINT"»»";:B$=G?(EN)  : 

-.11=0  :GOSUB5O07  :  T$=B? 
4370  PRINT "ll^^^^^^^^^^'>^^'l^^^^ IT  THAT  CORRECT  ■ 

-.NOW  xi(.Y    OR  N)?" 
4375  GETA$:IFA$=""THEN4375 
4380  IFA$="Y"THENG$ (EN)=T$:GOTO4000 
4385  IFA?="N"THEN4315 
4390  GOT04375 

5000  GETA?: IFA$<>""THEN5000 
5005  II=G:B$="" 
5007  PRINT">"; 
5010  PRINT"^^1T";  :FORI=1TO30:NEXTI: 

-.PRINT"^<  <V'; 
5015  GETA$:IFA$=""THEN5010 
5020  A=ASC(A$) :IFA=157THEN53O0 
5025  11=11+1 

5030  IPA=29THENPRINT">" ; :GOTO5040 
5035  GOTO5g50 

5040  IFII=35THENPRINT:PRINT 
5045  GOTO5010 
505  0  IFA=130RA=141THENPRINT: RETURN 


5070 
5080 

5090 

5095 
5100 

5110 
5120 

5300 
5310 
5320 
5330 
10000 

10010 

10020 

10030 

10035 
10040 
10045 
10100 

10103 

10105 
10110 
10115 
10117 
10120 
13000 
14000 

14003 

14005 
14010 
14015 
14017 
14020 
14103 

15000 
16000 

16003 

16005 
16010 
16015 
16017 
16020 
16030 
16103 

18000 

18020 
18030 
18040 
18050 
19000 
20000 

20001 


IFA=160THENA=32:A$= 

IF(A>95ANDA<160)ORl 

-.A=20)THENII  =  II-1; 

IFII=1THENPRINTA$; : 


CHR5(A) 

A<32)OR(A=34)OR( 
GOTO5O10 
B$=A$+HID${B$,2, 


-.LEN(B$)  )  :GOTO5010 
IFII=75THENPRINTA$:B$=BS+A$:RETURN 
PRINTA$; :B$=LEFT$(B$,II-l)+A$+MID$i 

-.BS,II  +  1,LEN(B$)  ) 
IFI1=35THENPRINT: PRINT 
GOTO5010 
1FII=0THEN5010 
11=11-1 

IFII=34THENPRINT"^T"; 
PRINT "-«";  :GOTO5010 

PRINT"fiT^T^         XENTER  DATA  -. 

-rMENUrt^" 

PRINT"iii^j:lr.  EDUCATIONAL 

-.X2f.  UTILITIES" 

PRINT"^tx3f.  GAMES  x4f. 

-.MAIN  MENU" 

GETA? :1FA$=""THENG0SUB1 000: 

-.GOTO10030 

A1=VAL{A$) 

ONA1GOTO10100, 14000, 16000, 105 

GOTO10030 

PRINT"fii^i^ENTER  ED.  PROGRAMS  (0  -. 

-.WHEN  DONE)  " 

PRINT"^^!^     15     10    15    - 

-.20    25    30    35" 

EE=EE+1 

PRINTEE+LE; :GOSUB5000 : ES=B$ 

IFE$="0"THENEE=EE-1:GOTO105 

IFE$="*"THENEE=EE-1:GOTO10110 

E$(EE+LE)=E$ 

GOTO10105 

PRINT"fii^i^ENTER    UTILITY    PROGS.     (0    - 

-.WHEN    DONE)  " 

PRINT"fi  15  10         15         20 

-.    25         30         35" 

EU=EU-fl 

PRINTEU+LU; :GOSUB5000:U$=B$ 

IFU$= "0 "THENEU=EU-1 :GOTO105 

IFU$="*"THENEU=EU-1:GOTO14O10 

U$(EU+LU)=U$ 

PRINT  "l^l^t^t'     15     10    15    - 

-.20    25    30    35" 

GOTO14005 

PRINT"fii^\^ENTER  GAME  PROGRAMS   (0  - 

-.WHEN  DONE)  " 

PRINT"fi  15  10         15         20 

-.    25         30         35" 

EG=EG+1 

PRINTEG+LU; : GOSUB5000 :G5=B$ 

IFGS="0"THENEG=EG-1:GOTO105 

IFG$="*"THENEG=EG-1:GOTO16O10 

G$(EG+LG)=G$ 

GOTO16005 

PRINT"MH  15  10         15         - 

-.20         25         30         35" 

PRINT  "fi^t'T^'^WANT  TO  SAVE  YOUR  DATA  - 

-.FIRST  (Y  OR  M)  ?" 

GETA?: IFA$=""THEN13020 

IFA5="Y"THEN19000 

IFA$="N"THENEND 

GOTO18020 

PRINT"Bi^^         XSAVE  FILE  MENUf' 

PRINT"'^^SAVE  WHICH  SET  OF  PROGRAM 

-.TITLES?" 

PRINT  "t^xlf.  EDUCATIONAL      x2f.  - 

-.UTILITIES" 
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20003  PRINT"i^x3f.    GAMES  x4r.    - 
-.MAIN    MENU" 

20004  GETA$: IFA$=""THENGOSUB100O : 
-.GOTO20004 

20005  A=VAL(A$) 

20006  ONAGOTO20010, 20014, 2001 7, 105 

20007  GOTO20004 

20010  IFA$="1"THENNM$="EDUCATI0NAL" : 

-,NM=EE+LE :  G0T02  000 
20014  IFA$="2"THENNM$="UTILITIES": 

-.NM=EU+LU :  G0T02  000 
20017  IFA$=''3"THENNM$="GAMES":NM=EG+LG: 

-rGOTO20O0 

20019  GOTO20004 

20020  0PEN1,1,1,NM$ 

20022  PRINT "\^^^NOW  WRITING  ";NM$;"  FILE.' 

20025  PRINT#1,NM 

20030  F0RQ=1T0NM 

20050  PRINT#1,EX$(Q) 

20060  NEXTQ 

20070  CLOSEl 

20080  PRINT-fii^T^  A  TOTAL  OF "  ;NM;NM$;  "  -. 

-iTITLES  WERE" 
20090  PRINT"^SAVED." 
20100  PR  I  NT  "i^!^  PRESS  ANY  KEY  TO  RETURN  -. 

-.TO  MAIN  MENU" 
20110  GETA?:IFA$=""THEN20110 
20120  GOTO105 
30000  PRINT"fii^i^         XLOAD  FILE  ^ 

-.MENUH'^" 
30010  PRINT"i^tLOAD  WHICH  SET  OF  PROGRAM 

-iTITLES?" 
30015  PRJNT"^^xlr.  EDFTCATinNAL      rO.r  .     - 

-.UTILITIES" 
30020  PRINT"i^x3r.  GAMES  x4r.  - 

-.MAIN  MENU" 
30030  GETL$:IFL$=""THENGOSUB1000: 

-.GOTO3003  0 

30035  L=VAL(L$) 

30036  ONLGOTO30040, 30050, 30060, 105 

30037  GOTO30030 

30040  IFL$="1"THENNM$=" EDUCATIONAL": 

-.LE=0:F=1:GOTO2100 
30050  IFL$="2"THENNH$="UTILITIES":LU=0: 

-.F=1:GOTO2100 
30060  IFLS= "3 "THENNM$="GAMES " : LG=0 : F=l : 

-.GOTO2100 
30070  GOTO30030 
31000  OPEN1,1,0,NM$ 
31005  PRINT"^^^^FOUND  ";NMS;".   NOW  ^ 

-.LOADING." 
31010  INPUT#1,NM 
31020  F0RJ=1T0NM 
31030  INPUT#1,EX$(J) 
31040  NEXTJ 
31045  CLOSEl 

31050  ONLGOTO31060, 31070, 31080 
31060  LE=NM:FORJ=lTONn:E$(J+EE)=EX$(J) : 

-.NEXTJ  :GOTO32000 
31070  LU=NM:FORJ=1TONM:U$(J+EU)=EX$(J) : 

-.NEXTJ:GOTO32000 
31080  LG=NM:F0RJ=1T0NM:G$(J+EG)=EX$(J) ; 

-.NEXTJ 
32000    PRINT"R\^\fA   TOTAL    OF    ";NM;NH$;"    -. 

-iTITLES    V7ERE" 
32010    PRINT"iyLOADED.  " 
32020    PRINT"Th^^         PRESS    ANY   KEY   TO    -. 

-.CONTINUE.  " 
32030    GETA$:IFA$=""THEN32030 
32040    GOTO105 


40000 

40010 
40020 
40025 
40029 
40030 

40035 

40040 

40045 
40049 
40050 

40060 

40070 
40075 
40080 

40085 

40090 
40095 
40100 

40105 
40110 
40120 

40200 

40205 

40210 
40220 

40300 

40305 
40310 
40320 

41000 


41002 
41005 

41010 

41020 
42000 

42010 
42020 
42030 
42040 
42050 
42060 


PRlNT"fl\^^HAVE    YOU    SAVED    THE    -. 

-.TITLES    ON    TAPE(YORN)?" 

GETA$: IFA$=""THEN40010 

1FA$="Y"THEN42000 

IFA$="N"THEN40030 

GOTO40010 

PRINT"t^\^  THEY  NEED  TO  BE  SAVED  -. 

-.(SORTED)  BEFORE" 

PRINT "i/THEY    CAN    BE    PRINTED.    SAVE    - 

-iTHEM    FIRST!  I  " 

PRINT "^^l/  PRESS  ANY  KEY  TO  GO  TO  -. 

-.SAVE  FILE  MENU." 

GETA$:IFA$=""THEN40045 

GOTO19000 

PRINT"fiiy^  XPRINT   LIST    -. 

-.HENUfi^t" 

PRINT  "l^l^^^Xlf.     EDUCATIONAL 

-nx2f.    UTILITIES" 

PRINT "^X3f.    GAMES       " 

0PEN1,DN,1 

GETA$ : IFA$=" "THENGOSUB1000 : 

-.GOTO40080 

A1=VAL(A$) 

ONA1GOTO40100,40200,40300 

GOTO40080 

PRINT#l,"fi         EDUCATIONAL  -. 

-.TITLES" 

PRINT#1:PRINT#1 

F0RJ=1T0EE+LE 

PRINT#1,MID$(STR$(J)  ,2)  ;".  -i 

-.";E$(J)  :NEXTJ:GOTO41000 

PRINT#l,"fi         UTILITIES  -. 

-.TITLES" 

PRINT#1:PRINT#1 

F0RJ=1T0EU+LU 

PRINT#1,MID$(STR$(J)  ,2)  ;".  -. 

-.";U?(J)  :NEXTJ:GOTO41000 

PRINT#1,"R  GAMES  -. 

-.TITLES" 

PRINT#1:PRINT#1 

F0RJ=1T0EG+LG 

PRINT#1,MID$CSTR$(J)  ,2)  ;".  -. 

-.";G$(J)  :NEXTJ:GOTO41000 

PEINT#1:PRINT#1:PRINT#1,  "SM  =  -. 

-.STEVE  MICHEL      CC  =  CREATIVE  -. 

-.COMPUTING" 

CLOSEl, DN,1 

PRINT"^^^^l^  PRESS  ANY  KEY  TO  RETURN 

-.TO  MAIN  MENU" 

GETA$:IFA$=""THEN41010 

GOTO105 

PRINT"fii^t^tSELECT   OUTPUT   DEVICE    -. 

-iDESIRED" 

PRINT"i^T^         XPfRINTER" 

PRINT"it'i^        xSfCREEN" 

GETA$:IFA$=""THBN42030 

IFA$="P"THENDN=4 :GOTO40050 

1FA$="S"THENDN=3:GOTO40050 

GOTO42030 


Odds  &  Ends  on  tti«  2040  Disk 

Jim  Butterfield 

WARNING:  If  you  get  an  unclosed  file  —  which 
shows  up  with  an  asterisk  on  the  directory  —  do 
not  scratch  it;  you  may  harm  other  files.  Instead, 
do  a  Verify  (called  COLLECT  on  4.0  systems). 
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Using  The  6522 
to  drive  a 
Printer 


Edward  H,  Carlson 
Okemos,  Ml 

Low  price  compatible  witli  good  quality.  If  you  are 
reaching  the  edge  of  your  budget,  the  fifty  dollars 
you  can  save  by  buying  tiie  parallel  version  of  a 
printer  may  loom  large.  I  wanted  a  printer  for- 
word  processing  and  chose  the  Comprint  912P  as 
suitable  for  rough  draft  printing.  I  was  confident 
that  the  6522  VIA  on  the  CPU  board  of  my  Ohio 
Scientific  C2-4P  could  handle  the  parallel  inter- 
facing. VIA  stands  for  Versatile  Interface  Adaptor, 
and  it  can  easily  be  configured  to  handle  all  the 
handshaking  involved  in  the  parallel  transfer  of 
data. 

This  article  will  describe  how  to  wire  the  6522 
to  the  printer  and  will  give  a  machine  language 
program  to  drive  it.  The  discussion  is  not  at  all 
restricted  to  OSI  computers,  nor  even  to  the 
Comprint  printer  since  the  same  principles  apply 
to  interfacing  to  other  printers. 

You  may  be  interested  in  the  features  of  the 
Comprint  that  appealed  to  me  for  word  processing. 
It  is  fast,  quiet  and  simple  in  design.  The  letter 
quality  is  high  for  a  dot  matrix  printer  as  it  has  a 
9x12  matrix.  It  is  quiet  because  it  is  an  electrostatic 
printer.  This  technology  uses  rolls  of  black  paper 
w'hich  are  coated  with  aluminum.  The  print  head 
sparks  holes  through  the  aluminum  to  expose  the 
black  color  below.  The  silvery  paper  is  low  in  cost, 
thin  and  somewhat  of  a  nuisance  to  handle.  How- 
ever, it  Xeroxes  very  well.  The  912  prints  3  lines  a 
second  of  80  characters  each. 

The  Comprint  has  a  variety  of  parallel  options 
including  the  IEEE-488  convention  and  both  wide 
and  narrow  strobe  modes.  I  purchased  the  Com- 
print soon  after  it  appeared  on  the  market  and 
made  the  modifications  they  suggested  to  operate 
with  the  Apple  II  Parallel  Interface  Card.  (Since  I 
also  have  an  .^pple,  the  same  printer  serves  both 
computers.)  The  signal  lines  into  the  printer 
include  seven  parallel  hues  for  the  ASCII  data  and 
one  line  for  DAV  which  is  a  narrow  (one  clock 
cycle  is  enough)  strobe  that  tells  the  printer  when 
valid  data  is  on  the  7  line  bus.  Signal  lines  from  the 
Comprint  include  NDAC  which  goes  low  to  ac- 
knowledge that  the  printer  has  accepted  the  char- 
acter, and  NRFD  (not  ready  for  data)  which  goes 
high  when  the  printer's  data  buffer  is  full. 


The  6522  VIA  has  two  8-bit  ports,  A  and  B, 
each  with  two  control  lines.  The  two  ports  are  not 
identical  and  for  no  good  reason  I  use  the  B  port 
for  the  seven  line  ASCII  bus.  Since  the  eighth  line 
is  not  needed  for  ASCII,  I  use  it  for  the  "busy" 
signal  (NRFD).  The  B  port  control  lines  CB I  and 
CB2  are  used  for  NDAC  and  DAV  respectively. 

The  listing  shows  a  subroutine,  OUTCHR, 
that  prints  one  character.  Also  included  is  a  DRIV- 
ER that  uses  some  subroutines  in  the  OSI  BASIC 
ROM's  to  read  tape  so  its  contents  can  be  sent  to 
the  printer.  Of  course,  this  driver  will  need  to  be 
altered  if  your  computer  is  not  an  OSI  machine. 

Implementing  a  6522  can  be  a  frustrating 
experience  because  of  its  many  options.  It  has  16 
registers  of  which  we  need  5.  Three  of  ihe  registers 
need  be  set  only  once,  but  we  have  plenty  of  time 
per  character,  and  it  is  simpler  to  set  these  registers 
each  time  the  subi'outine  is  entered.  Line  160 

...implementing  a  6522  can  be 

a  frustrating  experience  because 

of  its  many  options... 

enables  the  B  port  by  setting  bit  1  in  the  Auxiliary 
Control  Register.  In  line  170,  the  Data  Direction 
Register  for  B  port  is  loaded  such  that  lines  0  to  6 
are  output  (for  the  ASCII  character)  and  line  7  as 
input  (for  the  DAV  signal).  Finally,  the  Peripheral 
Control  Register  must  be  tickled  so  that  CB  1  and 
CB2  know  what  is  expected  of  them.  This  is  done 
in  line  210.  Bits  7,  6,  5  are  set  to  100  so  that  CB2 
will  pulse  low  when  the  CPU  writes  to  the  VIA, 
(the  strobe).  Setting  bit  4  tells  the  VIA  to  raise  a 
flag  when  CB  I  makes  a  low  to  high  transition  (the 
acknowledgement). 

When  the  subroutine  is  entered,  the  accumu- 
lator A  holds  the  character  to  be  printed.  It  is 
saved  by  pushing  it  on  the  stack.  Then  the  three 
registers  mentioned  above  are  configured.  Next 
the  VIA  looks  for  the  "busy"  signal  in  lines  220  to 
240.  Upon  finding  a  non-busy  status,  the  character 
is  pulled  from  the  stack  and  sent  to  the  B  Output 
Register,  and  on  to  the  printer.  The  last  event  is  to 
detect  the  DAV  acknowledgement.  When  it  comes 
in  on  CB  1 ,  it  sets  a  flag  in  the  Interrupt  Flag 
Register.  Detecting  this  flag  allows  an  exit  from  the 
loop  of  lines  300  to  330,  and  then  exit  from  the 
subroutine. 

There  you  have  it.  If  you  are  interfacing  to 
.some  other  printer,  the  tnain  thing  to  watch  for  is 
the  polarity  of  the  signal  hnes.  Consult  your  6522 
data  sheets  for  the  code  needed  to  reverse  the 
polarity  of  the  handshake  signals.  If  by  chance  you 
have  a  Comprint  91 2P  and  have  not  configured  it 
for  Apple  compatibility,  I  have  written  a  program 
for  that  case  too.  .An  article  describing  it  has  been 
accepted  for  publication  by  BYTE.  A  copy  of  the 
program  may  be  obtained  by  writing  me  at  3872 
Raleigh  Drive,  Okemos,  MI,  48864. 
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Introductory  Special 

$595.00 

Controller  Board,  DOS, 
40T  Disk  Drive  &  Cable. 


Pedisk  II  is  a  small  floppy  disk  controller  board  that  plugs  into  a  ROM  socket  in  your  computer,  The  board  contains  all  the  logic  required  for  a  disk 
system  as  well  as  space  tor  ROM.  It  is  used  with  standard  5Vi"  or  8"  disk  drive/power  supply  housings  to  form  a  fast,  reliable  and  inexpensive  mass 
storage  system.  The  CRS/PDOS  software  package  provides  simple  yet  sophisticated  file  handling.  The  extended  command  set  can  be  executed 
directly  or  from  a  program:  LOAD,  RUN,  SAVE,  OPEN,  CLOSE,  INPUT  and  PRINT. 

RELIABLE   -  single  chip  disk  controller  using  IBM  3740  recording 
format  gives  maximum  timing  margins  —  super  reliability. 
COMPATIBLE    -    reak    diskettes  from   other   systems   -   6502PDS, 
AIM,  SYM,  and  even   RADIO  SHACK  (special  software).  IBM  3740 
soft  sector  single  density. 


FAST  -  loads  programs  at  least  3  times  faster  than  2040.  It  is  the 
fastest  disk  available  for  PET. 


SOPHISTICATED  -  The  CRS/DOS  op  system  provides  advanced  file 
handling,  indexed-sequential,  but  very  easy  to  use. 

PEDISK  II  CONTROLLER  BOARD  3229.00 

CRS/PDOS  II  DOS  PACK S  75.00 

40T  DISK  DRIVE-HOUSING $395.00 

PEDISK  II  MANUAL     $   10.00 


MPI  B51  DISK  DRIVE  (40  track)     $269.00 

DISK  CABLE  (2  drive) $  35.00 

5%"  DISKETTES  (box  of  10) $  29.95 

PEDISK  II  DIAGNOSTIC  ROM $  29.95 


NEED  MORE  ROM  ROOM?      meet  SPACEMAKER  II 

Switch  between  one  of  four  ROMS  -  software  controllable. 

Mix  and  match  -  ROMS,  PROMS  and  EPROMS:  2332,  2732,  2532,  2716,  etc. 

Vertical  mount,  put  several  Spacemakers  in  adjacent  sockets. 


SPACEMAKER  II 


$39.00 


ROMDRIVER 


$39.00 


Spacemaker  tl  is  a  small  p.c.  board  containing  four  ROM  sockets.  It 
plugs  vertically  into  any  ROM  socket  in  a  new  PET.  The  user  can 
switch  between  any  of  the  four  ROMS  manually  or  under  software 
control  using  ROMDRIVER  or  USER  I/O. 

ROM  I/O     $9.95 

ROM  I/O  is  a  special  utility  control  software  package  for  ROM- 
DRIVER  owners  allowing  software  controlled  switching  of  ROMS. 
The  package  includes  menu-driven  selection  of  ROMS  and  an  "editor" 
to  add  or  delete  entries  —  complete  control  directly  from  your 
keyboard.  Available  on  Commodore  or  PEDISK  diskette. 


I  full  FORTH  +  I 

INTERPRETER  —  can  be  executed  directly  m  an  interpretive  mode 
to  speed  testing  and  debugging. 

CROSS-COMPILER  -  words  can  be  individually  compiled  and  tested, 
the  entire  program  can  also  be  cross-compiled  for  maximum  efficiency. 

COND.  ASSEMBLER  —  Machine  language  modules  can  be  intermixed 
and  conditionally  assembled  to  fullFORTH. 


ROMDRIVER  is  an  accessory  parallel  output  port  used  to  control 
Spacemaker  ROM  selection  without  using  the  User  Port  of  the  PET. 
The  small  p.c.  board  plugs  inside  the  PET  and  is  connected  to 
Spacemakers  with  jumper  cables. 

USER  I/O $12.95 

USER  I/O  allows  software  control  of  Spacemaker  utilizing  the  PET 
User  I/O  port.  A  connector  with  specially  designed  jumpers  and  the 
diskette  with  control  software  "SPACECTL"  is  provided.  Available 
on  Commodore  or  PEDISK  diskette. 


FULL  FEATURE  "FORTH"  FOR  6502  SYSTEMS 

STRING  HANDLING  —  variable  length  constants  and  variables  are 
allowed-  Processes  compare,  move,  concatenate  and  sub-string  words. 

FLOATING  POINT  -  process  5  Or  9  digit  integer  and  floating  point 

numbers  for  arithmetic  operations. 

SCREEN    EDITOR    -   contains   a   unique   full    cursor   visible  screen 

editor. 


SPECIFYPEDISK,6502PDS,  COMMODORE  2040  DISK $65.00 


c 
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6502  PROFESSIONAL  DEVELOPMENT  SYSTEM 


6502PDS:  MINI $2695.00 

The  6502  PDS  is  a  versatile  multi-card  microcomputer  designed  and  programmed  for  professional  engineering  and  program  development  work, 
scientific  computing,  and  general  processing.  This  system  provides  the  maximum  m  capability  at  the  lowest  possible  cost  by  utilizing  the  industries 
must  widely  used  computer  bus  -  the  8100.  With  a  choice  of  over  500  peripherals  including  telephone  interface,  speech  synthesizers,  vocoders,  and 
even  associate  memory,  the  potential  end  use  is  unlimited.  The  6502  PDS  is  housed  m  a  sturdy  SlOO  mainfrain  containing  the  6502  MPU,  Multiple 
I/O  Card,  RAM,  and  Disk  Controller  Board.  This  leaves  room  for  future  expansion.  The  system  can  be  connected  to  any  RS232  terminal  or  used 
with  the  optional  internal  Video  Board. 

FOR  INFORMATION,  SEE  YOUR  DEALER  OR: 


MICROTECH] 


P.O.  BOX  102  •   LAIMGHORNE,  PA  19047  •   (215)757-0284 

'PET   IS  A  REGISTERED  TRADEMARK  OF  COMMODORE, 
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TSE-HARDSIDE  HAS  IT  ALL 
IN  ONE! 

How  many  times  have  you  wished  that  there  was  a  single  source  for 
your  personal  computer  needs?  Well  look  no  further,  TSE- 
HARDSIDE,  located  in  pleasant  New  Hampshire,  has  virtually  every 
conceivable  item  for  your  micro.  Whether  you're  shopping  for  your 
Apple,  Pet,  TRS-80  or  Atari,  TSE-HARDSIDE  has  it  all.  We  stock 
hardware,  software,  books,  magazines  and  specialty  items  for  all  of 
the  popular  machines.  So  the  next  time  you're  out  shopping  for  your 
system  don't  be  surprised,  be  satisfied.  Remember  the  name  TSE- 
HARDSIDE  as  your  choice  for  quality,  service  and  reliability. 


TSeiHORDSIIX 

6  Souin  Si  .Millord.  NH  03055  (603)673-5144 
TOLL  FREE  OUT-OF-STATE      1-B0O-Z58-1790 
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Microcomputer  Measurement  And 
Control  For  PET,APPLE,KIM  and  AIM65 


The  world  we  live  in  is  full  of  variables  we  want  to 
measure.  These  include  weight,  icmperaiure,  pressure, 
humidity,  speed  and  fluid  level.  These  variables  are 
continuous  and  their  values  may  be  represented  by  a 
voltage.  This  voltage  is  the  analog  of  the  physical 
variable.  A  device  which  converts  a  physical, 
mechanical  or  chemical  quantity  to  a  voltage  is  called 
a  sensor. 

Computers  do  not  understand  voltages:  They 
understand  bits.  Bits  are  digital  signals.  A  device 
which  converts  voltages  to  bits  is  an  analog-to-digital 
converter.  Our  AIM  16  (Analog  Input  Module)  is  a  16 
input  analog-to-digital  converter. 

The  goal  of  Connecticut  microcomputer  in 
designing  the  uMAC  SYSTEMS  is  to  produce  easy  to 
use,  low  cost  data  acquisition  and  control  modules  for 
small  computers.  These  acquisition  and  control 
modules  will  include  digital  input  sensing  (e.g. 
switches),  analog  input  sensing  (e.g.  temperature, 
humidity),  digital  output  control  (e.g.  lamps,  motors, 
alarms),  and  analog  output  control  (e.g.  X-Y  plotters, 
or  oscilloscopes). 

Connectors 

The  AIM  16  requires  connections  to  its  input  port 
(analog  inputs)  and  its  output  port  (computer  inter- 
face). The  ICON  (Input  CONnector)  is  a  20  pin, 
solder  eyelet,  edge  connector  for  connecting  inputs  to 
each  of  the  AlM16's  16  channels.  The  OCON  (Output 
CONnector)  is  a  20  pin,  solder  eyelet  edge  connector 
for  connecting  the  computer's  input  and  output  ports 
to  the  AIM  16. 

The  MANMODI  (MANifold  MODule)  replaces 
the  ICON.  It  has  screw  terminals  and  barrier  strips  for 
all  16  inputs  for  connecting  pots,  joysticks,  voltage 
sources,  etc. 

CABLE  A24  (24  inch  interconnect  cable)  has  an 
interface  connector  on  one  end  and  an  OCON 
equivalent  on  the  other.  This  cable  provides  connec- 
tions between  the  u.MACSYSTEMS  computer  inter- 
faces and  the  AIM  16  or  XPANDRl  and  between  the 
XPANDRI  and  up  to  eight  AIM  16s. 


Analog  Input  Module  . 

The  AIM  16  is  a  16  channel  analog  to  digital  converter 
designed  to  work  with  most  microcomputers.  The 
AIM  16  is  connected  to  the  host  computer  through  the 
computer's  8  bit  input  port  and  8  bit  output  port,  or 
through  one  of  the  uMAC  SYSTEMS  special  inter- 
faces. 

The  input  voltage  range  is  0  to  5.12  volts.  The  in- 
put voltage  is  conserted  to  a  count  between  0  and  25.s 
(00  and  FF  hex).  Resolution  is  20  millivolts  per  count. 
Accuracy  is  O.?"??!!  +   1  bit.  Conversion  lime  is  less 
than  100  microseconds  per  channel.  All  16  channels 
can  be  scanned  in  less  than  1.5  milliseconds. 

Power  requirements  arc  12  volts  DC  at  60  ma. 

POWl 

The  POWl  is  the  power  module  for  the  AIM16.  One 
POW]  supplies  enough  pow'cr  for  one  A1M16.  one 
MANMODI,  sixteen  sensors,  one  XPANDRl  and  one 
computer  interface.  The  POWl  comes  in  an  American 
version  (POWIa)  for  1 10  VAC  and  in  a  European  ver- 
sion (POWle)  for  230  VAC. 
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''*%'*^    TEMPSENS 


This  module  provides  two  temperature  probes  for  use 
by  the  AIMI6.  This  module  should  be  used  with  the 
MAN.MODl  for  case  of  hookup.  The  MANMODI 
will  support  up  to  16  probes  (eight  TEMPSENS 
modules).  Resolution  for  each  probe  is  l°F. 


Remote  Controller- 
Clock  and  Calendar 

AN  INEXPK.NSIVK  CONTROL 
SOLUTION  FOR 
HOME  SECURITY  •  ENERGY  CON- 
SERVATION •  GREENHOUSES 

•  ENVIRONMENTAL  CONTROL 

•  INDUSTRIAL  CONTROL 

•  LABORATORIES 

SUPER  X-10  MOD  SPECS 

1.  Remote  conlroller 

Controls  op  to  256  different  remote  devices  by  sen- 
ding signals  over  the  house  wiring  to  remote 
modules.  Uses  BSR  remote  modules  available  all 
over  the  USA  {Sears,  Radio  Shack,  etc.).  Does  not 
require  BSR  conlrol  module.  Does  not  use  sonic 
link. 

2.  Ciock/calendar 

Time  of  day  -  hours,  minutes,  seconds 

Date  -  inonth,  day  -  automatically  corrects  for 

28,29,30  and  31  day  months.  Day  of  the  week. 

3.  Digital  input/outputs 

8  inputs  -  TTL  levels  or  swiich  closures, 
Can  be  used  as  a  trigger  for  a  stored 
sequence. 

8  outputs  -  TTL  levels 
Power  supply  included  1  lOVAC  only. 

XPANDRl 

The  XPANDRl  allows  up  lu  cii;hi  Input/Ouipui 
modules  to  be  connected  to  a  computer  at  one  time. 
The  XPANDRl  is  connected  lo  the  compiilcr  in  place 
of  the  AlMi6  or  XIO  MOD.  Up  to  eight  AlMl6sor 
seven  .Aim  16s  and  one  XIO  MOD  are  then  connected 
to  each  of  the  eight  ports  provided  using  a  CABLE 
A24  for  each  module. 


For  your  convenience  the  AI.M16  and  ihe  ,X10  MOD  come  as  pari  of  a  number  of 
sets,  The  minimum  configuration  for  a  usable  system  is  the  A1M16  Starter  Set  1 
which  includes  one  AIM16,  one  POWl.  one  ICON  and  one  OCON.  The  .^1M16 
Starter  Set  2  includes  a  MANMODI  in  place  of  the  ICON,  The  minimum  configura- 
tion for  a  usable  system  is  the  XIO  MOD  Starter  Set  which  includes  one  .XIO  MOD, 


one  ICON  and  one  OCON.  These  sels  require  that  you  have  a  hardware  knowledge 
of  your  computer  and  of  compuler  interfacing. 

For  simple  plug  compatible  systems  we  also  offer  compuler  interfaces  and  sels 
for  many  computers. 


AIM  16  179.00 

SUPER  XIO  MOD  (1 10  VAC  only) 249.00 

POWla  (POWer  module-1 10  VAC) 14.95 

POWlc  {POVVer  module-230  VAC) 24.95 

ICON  (Input  CONnector) 9.95 

OCON  (Output  CONnector) 9.95 

MANMODI  (MANifold  MODule)  59.95 

CABLE  A24  (24  inch  interconnect 

cable)  19.95 

XPANDRl  (allows  up  to  8  Input  or 
Output  modules  to  be  connected  to  a 

compuler  at  one  time) 59.95 

TEMPSENS2PI  (two  temperature  probes, 

-lO'F to  I60''F) .69.95 

LIGHTSENS I  PI  (light  level  probe) 89.95 

The  following  sels  include  one  AIM  16, 
one  POWl,  one  OCON  and  one  ICON. 

AIM16  Starter  Set  la  (1 10  VAC) 189.00 

AIM16  Starter  Set  le  (230  VAC) 199.00 

AJl  prices  and  speciflcalions  siit)ject  lo  change  witiiout 
notice,  Ouf  30.day  money  back  guarantee  applies. 


The  following  sets  include  one  A1.MI6, 

one  POWl,  one  OCON  and  one  MANMODI. 

AIM  16  Starter  Set  2a  (1 10  VAC) 239.00 

Al.M  16  Starter  Set  2e  (230  VAC) , , .  249.00 

The  following  modules  plug  into  their  respective 
computers  and,  when  used  wiih  a  CABLE  A24, 
cluninale  the  need  for  custom  wiring  of  the  computer 
interface, 

PETMOD  (Commodore  PET) 49,95 

KIMMOD  (KIM.SY.M) 39.95 

APMOD  (APPLE  II) 59.95 

TRS-80  MOD  (Radio  Shack  TRS-80) 59.95 

AIM6S  MOD  (AIM  65)  39.95 

The  following  sets  include  one  AIM  16,  one  POW  I .  one 
MAN.MODl.  one  CABLE  A24  and  one  compuler  inter- 
face module 
Pl-.TSETla  (Commodore  PET  - 

1 10  VAC) 295.00 

PETSETIe  (Commodore  PET  - 

230  VAC) 305.00 


KIMSETIa  (K1M,SYM,AIM65  - 

1 10  VAC) 285.00 

KIMSETIe  (K1M,SYM,AIM63  - 

230  VAC) 295.00 

APSETla(APPLEI|.  110  VAC) 295.00 

APSETlc(APPLE  II  -230  VAC) 305.00 

TRS-80  SETlu  (Radio  Shuck  TRS-80  - 

1 10  VAC) 295.00 

TRS-80  SETk(Radio  Shack  TRS-80  - 

2.W  VAC) 305.00 

A1M65  SETla(AIM65-l  10  VAC) 285.00 

A1M65  SETle(AIM65-230  VAC) 295.00 

The  following  sets  include  one  XIO  MOD.  one 
CABLE  .A24.  one  ICON  and  one  computer  inlerfacc 
module. 

PETSEi  r2(Commodore  PET) 295.00 

KIMSET2(KLM,SYM) 285.(10 

APSET2(APPLE  II) ,295.00 

TRS-80  SET2  (Radio  Shack  TRS-80) 295.00 

A1M65  SET2  (.A1M65) 285.00 

SUPER  XIO  MOD/,\PANDRl  .SET2  (if  you  already 
haseaSETl) 295.00 


Printer  And  Communication  Interfaces  For  The  CBM/PET 


SADI 


For  Serial 

Two-way 

Communication, 

Parallel 

Printers, 

and  Serial 

Printers 


ADA1600  •  For  Parallel  NEC 
and  Centronics  Standard  Printers 


SADl  -  The  microprocessor  based  stria!  and  parallel  inKrface  for  the 
Commodore  PET.  SADl  allows  you  to  conned  your  PET  lo  parallel 
and  serial  primers.  CRT's,  modems,  acoustic  couplers,  hard  copy  ter- 
minals and  other  computers.  The  serial  and  parallel  ports  are  indepen- 
dent allowing  the  PET  lo  communicate  with  both  peripheral  devices 
simultaneousty  or  one  at  a  lime.  In  addition,  the  RS-232  device  can 
communicate  with  the  parallel  device. 
Special  Features  for  the  PET  interface  include: 

Conversion  lo  true  ASCII  both  in  and  out 

Cursor  controls  and  function  characters  specially  primed 

Selectable  reversal  of  upper  and  lower  case 

Addressable  -  works  with  other  devices 
Special  Features  for  the  serial  interface  include: 

Baud  rate  selectable  from  75  to  9600 

Half  or  full  duplex 

32  character  buffer 

X-ON,  X-OFF  automatically  sent 

Selectable  carriage  return  delay 
Special  Features  for  the  parallel  interface  include: 

Data  strobe  •  either  polarity 

Device  ready  -  either  polarity 

Centronics  compatible 
Complete  with  power  supply,  PET  IEEE  cable,  RS-232  connector, 
parallel  port  connector  and  case.  Assembled  and  tested. 

SADIa(IIOVAC)$295 

SADIc  (230VAC)  $325 


The  ADA1600  is  a  low  cost  easy  to  use  interface  for  the  Commodore  Computers.  It  allows  the  PET  and  CB.M  computers  to  use  standard  Centronics  type  printers  (in- 
cluding the  NEC  5530)  for  improved  quality  printing.  The  ADA1600  has  a  two  foot  cable  which  plugs  into  the  PET  IEEE  port.  Another  IEEE  card  edge  connector  is 
provided  for  connecting  disks  and  other  peripherals  to  the  PET.  The  ADA1600  is  addressable  and  does  not  tic  up  the  bus.  The  address  is  switch  selectable.  A  four  foot 
cable  with  a  standard  36  pin  Centronics  connector  is  provided,  A  switch  selects  upper/iower  case,  upper/lower  case  reversed  (needed  for  some  Commodore  machines) 
and  upper  case  only  for  clearer  program  listings.  Works  with  WORDPRO,  BASIC  and  other  software.  No  special  programming  is  rcctuired.  The  case  measures  3  1/2  .x 
5  3/4  inches.  Comes  complete,  assembled  and  tested,  with  case  and  cables.  Power  is  obtained  from  the  printer  or  an  external  power  supply  may  be  used.  Retail  price 
for  the  ADAI60Q  is  5129. 


ADA1450  •    Serial  Printer  Adapters 


The  ADA14S0  is  a  low  cost,  easv  to  use  .serial  interface  for  the  Commodore  Computers,  It  allows  the  PET  and  CBM  computers  to  use  standard  serial  primers  for  im- 
proved quality  printing.  The  ADA1450  has  a  two  foot  cable  which  plugs  into  the  PET  IEEE  port.  Another  IEEE  card  edge  connector  is  provided  for  connecting  disks 
and  other  peripherals  to  the  PET.  The  ADA1450  is  addressable  and  does  not  tic  up  the  bus.  The  address  is  switch  selectable.  A  six  fool  RS-232  cable  is  provided  with  a 
DB25  connector.  Pin  3  is  data  out.  Pins  5,6  and  8  act  as  readv  lines  to  the  printer.  Pins  4  and  20  act  as  ready  lines  from  the  printer.  These  lines  can  be  switched  for 
non-standard  printers.  Baud  rate  is  selectable  to  9600  baud.  A  switch  selects  upper/lower  case,  upper/lower  case  reversed  (needed  for  some  Commodore  machines)  and 
upper  case  only  for  clearer  program  listings.  Works  with  WORDPRO,  BASIC  and  other  software.  No  special  programming  is  required,  The  case  measures  3  I^Z  "  5 
3/4  inches.  Comes  complete,  assembled  and  tested,  with  case,  cables,  power  supply  and  software  on  cassette  lor  graphing  functions,  formatting  data  etc.  The  ADA145U 
has  a  female  DB25  connector  at  the  end  of  the  RS-232  cable  for  most  standard  printers.  The  ADA14.S0N  has  a  male  DB25  at  the  end  of  the  Rb-232  cable  for  the 
DIABLO  serial  printers.  Retail  price  for  the  ADA1450  or  1450N  is  S149. 

ADA730  Parallel  •  For  the  Centronics  730  and  737  Printers 

The  ADA730  is  a  low  cost  easy  !o  use  interface  for  the  Commodore  Computers.  It  allows  the  PET  and  CBM  computers  to  use  Centronics  type  730  and  737  printers. 
The  ADA730  has  a  two  foot  cable  which  plugs  into  the  PET  IEEE  port.  Another  IEEE  card  edge  connector  is  provided  for  connecting  disks  and  other  peripherals  to 
the  PET.  The  AI3A730  is  addressable  and  does  not  tie  up  the  bus.  The  address  is  switch  sclcciable.  A  cable  with  a  36  pin  card  edge  connector  is  provided-  A  switch 
selects  upper/lower  coa.sc,  upper/lower  case  reversed  (needed  for  some  Commodore  machines)  and  upper  case  only  for  clearer  program  listings.  Works  with  WORD- 
PRO. BASIC  and  oiher  software.  No  special  programming  is  required.  The  case  measures  3  1/2x5  3/4  inches.  Comes  complete,  assembled  and  tested,  with  case  and 
cables.  Power  is  obtained  from  the  printer  or  an  external  power  supply  may  be  used.  Retail  price  for  the  ADA  is  SI 29. 


SOFTWARE 


QUANTITY      DESCRIPTION        PRICE    TOTAL 


Word  Processor 
Program  • 

PET  Word  Processor.  On  tape  - 

S39.50.  On  disk  -  49.50 

For  8K  Pets  29.50 

For  16K  and  32K  Pels  39.50 

Compose  and  print  letters,  flyers, 

ads,  manuscripts,  etc.  Uses  disk  or 

tape.  30  page  manual  included. 


ADA400 
RS-232 

To  Current 

Loop 

Adapter 


SUBTOTAL 


Handling  and  shipping  —  add  per  order 


S4.00 


Foreign  orders  add  lO^a  for  AIR  postage 
Conn,  residents  add  TJo  sales  tax 


TOTAL  ENCLOSED 


NAME    

COMPANY 
ADDRESS 


CITY  _ 
STATE . 


VISA  0  M/C  O  Expiration  date. 
Card  number 


.ZIP. 


Mention  this  magazine  and  deduct  2i5'«  from  the  TOT.AL 


RS-232  to  current  loop  adapter  (ADA  400). 

S29.50 

Two  circuits  ■  1  each  direction.  Run  an  RS-232 

device  off  a  computer's  teletype  port  or  vice 

versa.  Optoisolated. 


ADA4005  -  Solder  Pads  24.50 
ADA400B  -  Barrier  Strips  with  screw 
lerminals  29.50 


In  the  US  order  from:  Connecticut  Microcomputer,  Inc. 
34  Del  Mar  Drive  Brookfield,  CT  06804  (203)  775-4595 
In  Canada  order  from:  Batteries  Included,  LTD 
71  McCaul  Si.  F6  Toronto,  Canada  M5T2X1  (416)596-1405 


jif^-tlt^ 


Connecticut  micro€k>mputer,  Inc. 

34  Del  Mar  Drive.  Brookfield,  CT  06804 
203  775-4595  TWX:  710  456-0052 
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Using  The 
Aim  65  As  A 
Remote 
Terminai  For 
An  Apple 


Tony  Davis  and  Marvin  L  De  Jong 
Department  of  Matt^ematics-Pt^ysics 
Tt^e  Sct^ool  of  tine  Ozarl<s 
Pt.  Lookout,  MO  65726 

In  the  March  issue  of  COMPUTE!  (page  28  -  Com- 
puter Communications  Experiments)  a  circuit  using 
the  6551  ACIA  (Asynchronous  Communications 
Interface  Adapter)  and  a  RS-232C  interface  to  a 
modem  were  described.  We  have  used  this  same  in- 
terface to  a  NOVATION  CAT  modem  on  the  AIM 
65  to  operate  an  Apple  II  over  a  telephone  link.  The 
Apple  was  equipped  with  a  Hayes  micromodem. 
The  Apple  was  used  to  run  BASIC  programs,  but  its 
monitor  can  also  be  used  to  load  machine  language 
programs  or  data. 

The  circuit  will  not  be  repeated  here,  but  we  will 
provide  the  listing  of  the  simple  program  that  we 
used  on  the  AIM  65.  The  Hayes  Micromodem 
comes  with  its  own  firmware. 

We  operated  the  655 1  in  the  mode  where  a  re- 
ceived character  produces  an  interrupt.  The  inter- 
rupt routine  simply  prints  the  character  on  the  dis- 
play by  jumping  to  an  AIM  65  monitor  subroutine. 
The  program  runs  at  300  or  1 10  Baud.  In  Listing  1 
we  show  the  6551  initiaHzed  to  run  at  300  Baud. 
Note  that  in  either  case  the  AIM  65  thermal  printer 
was  not  used  because  its  print  time  is  so  long  that  sev- 
eral characters  are  missed.  To  use  it  one  would  have 
to  write  a  routine  to  buffer  the  incoming  data.  Our 

AIM  65-8K  '' ■' 


SYSTEM 

PERIPHERIALS 

P.O.  Box  971,  Dept.  C. 

Troy,  Ml  4B099 


MEMORY 

*  Plugs  directly  onto  AIM-65  memory  expansion 
blade, 

*■  Positions  neatly  under  AlM-65  allowing  use 
of  available  enclosures. 

*  Expansion  blade  provided  for  furttier  expansion. 

*  +5  volts  supplied  by  host  Airv1-65. 

*  SK  memory  board  drav^s  only  200  ma. 

*  Two  separately  addressable  4K  blocks, 

*  KIM-1  compatible. 


MEM  4;     8  K  memory  board, 

4K  RAM  ctlips S109.00 

MEM  8:     8K  memory  board, 

8K  RAM  ctlips S169.00 

RAM  4:     4K  RAM  cfvips  to  upgrade 

MEM  4  to8K S  69.00 

Full  documentation  kit S     1.00 


Listing  1.  Program  to  operate  an  Apple  from  an 
AIM  65  over  a  telephone  line. 


$0FOO  58 
OFOl  D8 

START 

CLI 
CLD 

Allow  inlcTTuptSf 

0F02  A9 

09 

LDA 

#09 

Set  up  the  6551 

OF04  8D 

02 

94 

STA 

command  register. 
CMNDREG 

0F07  A9 

16 

LDA 

#$13 

Set  up  the  control 

0FO9  8D 

03 

94 

STA 

CNTREC 

register  for 
300  Baud. 

OFOC  20 

3C 

E9 

CHAR 

JMP 

READ 

Gel  character  Trom 

OFOF  8D 

00 

94 

STA 

DATA 

AIM  keyboard. 
Output  dau  to  the  G551 . 

0FI2  AD  01 

94 

CHECK 

LDA 

STATUS 

Check  the  status  register 

0F15  29 

10 

AND 

#$10 

Check  bit  four. 

0FI7  FO 

F9 

BEQ 

CHECK 

Wail  for  data  to  be 
iransmUled, 

0F19  DO 

BNE 

*  *  *  * 

CHAR 

Then  get  another 
character. 

Interrupt  Routine 

$0EO0  48                      IRQ 

PHA 

Save  the  iiccumulator. 

OEOt  AD  00 

94 

LDA 

DATA 

Get  character  that 

was  sent. 

0E04  20 

7A 

E9 

JMP 

OUTPUT 

Output  character  to 

0E07  AD  01 

94 

LDA 

STATUS 

display. 
Clear  IRQ  flaj;. 

0E0A68 

PLA 

OEOB  40 

RTI 

Be  sure 

to  load  the  interrupt 

vector  $0E00. 

ultimate  goal  is  to  use  the  AIM  65  to  access  the  col- 
lege's big  IBM  mainframe.  I  am  especially  in- 
terested in  being  able  to  calculate  my  own  salary  and 
print  my  own  paycheck  at  the  end  of  each  month. 


PETS  APPLE  It  USERS 

''       Tiny   Pascal 

Plus  t 
GRAPHICS 


The  TihtV  Pascal  System  (urns  ycur  APPLE  II  micro  into  a  16-t>]I  P-machine.  You 
too  can  learn  ttve  language  that  is  sEaleb  lo  tjecome  ttie  successor  10  BASIC.  TJNY 
Pascal  otlers  ttie  (ollowpng 

*  LINE  EDITOR  to  create,  modlly  and  maintain  soujca 

*  COMPILER  lo  produce  P-code.  tti«  a&&emt>ly  langayage  of  tt>e  p.maclilna 
'   INTERPRETER  to  execute  Itie  compiled  P-code  (tiet  TRACE) 

'  Struclurad  programmed  constructs:  CASEOF-ELSE.  WHILE-OO,  IF-THEN- 
ELSE.  REPEAT-UNTIL,  FOR-TOtDOWNTO-DO,  BEGIN-END,  MEIVI,  CONST, 
VAR   ARRAY 

Our  new  TINY  Pascal  PLUS*  provides  graphics  and  oltier  builtin  'unctions: 
GRAPHICS.  PLOT,  POIMT.  TEXT.  INKEY.  ABS  AND  SQR.  The  PET  version  sup- 
ports douDle  iilensily  ploltirg  on  40  column  screen  giving  80  x  50  Diot  positions. 
The  APPLE  II  version  supports  LORES  and  loi  BOM  APPLESOFT  owners  Ihs 
HIRES  graphics  plus  oltier  features  -.vilti:  COLOR.  HGHAPHICS.  HCOLOR, 
HPLOT.  PDL  and  TONE,  For  those  who  00  nol  require  graptllcs  capabilities,  you 
may  sllil  order  our  OfigmaJ  Tiny  Pascal  package 


TINY  Pascal  PLUS.  GRAPHICS  VERSION- 
PET  32K  t^EW  Roms  cassette S5S 

PET32KNEWRomsclislieIle S50 

APPLEII  32K'J8K  v^■;DOS3^or3  3 S50 


TINY  Pascal  NON-GHAPHICS  VERSIONS- 
PET  16KI32K  NEW  Roms  cassette S40 

PET  16K'3!K  NEW  Roras  dishette S35 

APPLE  II  w.'ROM  Appiesoll  SSKwyDOS S35 

APPLE  II  H.RAM  Applesoft  43K  «'/,'DOS S3S 

USER'S  Manual  [rBtundat:le  with  soltware  Dfder) S10 

6502  Assemtlly  Listing  ot  INTEflPRETER-graptiics S25 

6502  Assembly  Listing  ol  INTER=RETEB-non  graphics    S20 

f  <»£l  ;siijg*  I- -J  s  i-acis*:j 
e«BttS  1,*  The  S3..o^E    CLdSi; 


VISA- 


mil***** 
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ONE  GREAT  SHOW 
DESERVES  ANOTHER 


Since  the  COMDEX  show  was  first  established 
two  years  ago,  and  particularly  after  the  recent 
overwheiming  success  of  COMDEX  '80,  many 
vendors  and  iSOs  alike  have  been  telling  us 
that  this  unique  conference  and  exposition 
once  a  year  just  Isn't  enough. 

Hello  there,  COMDEX/SPRING! 

The  big  push  is  on  to  computerize  America, 
boost  productivity  in  every  office  and  shop 
across  the  land.  That's  why  Independent  Sales 
Organizations  (ISOs)  are  springing  up  like 
dandelions  after  the  rain.  Vendors  are  accel- 
erating their  schedule  of  new  product 
introductions,  and  their  intense  search  for 
independent  sales  representation. 

Thus,  COMDEX/SPRING, 
in  New  York  City,  June 
23-25,  1981.  If  you're  a 
computer  industry  mar- 
keter, whether  vendor  or 
ISO,  you've  now  got  TWO 
opportunities  each  year 
to  get  together  with  the 
people  who  really  count. 
You've  got  COMDEX/ 
SPRING  in  New  York  in 
June,  and  you've  got 
COMDEX  '81  in  Las 
Vegas  in  November. 
That's  a  one-two  market- 
ing punch  guaranteed  to 
get  the  job  done! 


Who  exhibits  at  the  COMDEX  shows? 

Leading  vendors  of  small  computer  and  word 
processing  systems,  peripherals,  software  and 
media-supplies-services  have  been  flocking  to 
COMDEX  since  its  inception  in  1979.  Write  or 
call  us  immediately  for  detailed  information  on 
COMDEX/SPRING  and.  among  other  things, 
we'll  send  you  a  list  of  more  than  360  such 
companies  which  exhibited  at  COMDEX  '80. 

ISO,  as  defined  in  our  dictionary. 

ISO  (ai-ess-oh)  Independent  Sales  Organiza- 
tion. Acronym  coined  by  The  Interface  Group 
in  summer  1979  as  convenient  umbrella  for  all 

independent  third-party 
sellers  of  small  systems 
and  related  products  and 
services.  Such  as:  Dealers, 
distributors,  systems 
tiouses,  commercial 
OEMs,  computer  retailers, 
manufacturers'  reps, 
turnkey  vendors,  office 
machines/products  deal- 
ers, software  f^ouses,  etc. 
The  acronym  has  gained 
widespread  acceptance, 
following  its  introduction 
by  COMDEX, 


SPRING'Sl 


June  23-25,  1981  •  New  York  Coliseum,  New  York,  New  York 


For  further  information,  write  to  COMDEX/SPRING  '81. 

160  Speen  Street.  Framingham.  MA  01701. 

Or  call  us  toll-free:  800-225-4620  (in  Mass..  617-879-4502). 

Another  Conference  and  Exposition  from  THE  INTERFACE  GROUP 

Producers  of:  INTERFACE.  INTERFACE  WEST.  FEDERAL  DP  EXPO,  COMDEX,  COMDEX/SPRING, 

THE  NATIONAL  Sf^ALL  COMPUTER  SHOW 
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NEW- 
LOW  COST  DISK 

FOR  PET 
CBM 


PEDISK  li  from  cgrs  MICROTECH  is  a  new  floppy 
disk  controller  board  for  thie  Commodore  PET- 
/CBM  (tm|  computer.  PEDISK  II  contains  control 
ROM  and  all  logic  required  to  read,  write,  and 
control  up  to  two  standard  floppy  disk  drives  (either 
5.25"  or  8").  The  PEDISK  II  controller  mounts  inside 
the  PET  and  occupies  previously  unused  memory 
space.  The  circuit  board  plugs  into  an  existing 
ROM  socket  in  your  machine,  and  is  connected  by 
cable  to  an  external  disk  drive. 
A  complete  disk  system  includes  the  PEDISK  II 
Conlroller.  Disk  Operating  System  software,  con- 
ecting  cable,  and  an  external  disk  drive  set.  Simply 
plug  in  the  controller  board,  and  your  disk  system:  is 
ready  to  run. 

The  PEDISK  II  system  offers  Speed,  reliability,  and 
IBM  compatibility. 

Complete  System  prices  with  DOS  and 
cable: 

5.25"  40  track,  1  drive,  143K  $560 

5.25"  80  track,  1  drive,  286K  690 

8"!BM3740format,77track,250K         995 

Individual  Component  Prices: 

PEDISK  M  Controller  Card  S229 

DOS  for  PEDISK  II  75 

Cable  assembly  for  2  drives  35 


CBM  SOFTWARE 

Legal  Time  Accounting  Package 
Medical  Accounting  Package 
Complete  General  Accounting  Package 
Ck>mprehensive  Investment  Analysis  Package 
Dow  Jones  Portfolio  Management 
Personal  Tax  Calculator 
Tax  Preparation  System 
Information  Retrieval  and  Management  Aid 
Wordcratt  80  Wordprocessof  Package 
Pascal  Development  Package 
Assembler  Development  Package 
Intelligent  Terminal  Emulator 


SOFTPACK-1  (torn  Competilive  Software 
1 6  games  and  utilities  lor  PET 

MICROREVEflSI  for  PET  by  Michael  Riley 
Super  Machine  Language  Version  of  Ottiello 

TI)NHELVISiaN/KAT&  MOUSE  by  Michael  Riley 

Two  excellent  machine  language  maze  programs 


St  35 

65 

445 

400 

325 

?% 

99 

30 

25 


PERSONAL  SOFTWARE 

Microchess 
Checker  King 
Gammon  Gambler 
Time  Trek 
Bridge  Partner 


1700 
)700 
1700 

1345 
1345 


HAYDEN  SOFTWARE 

Complex  Mathematics  t2  70 

Engineering  Mathematics  12  70 

General  Malhemalics  1270 

MCAP  Circuit  Analysis  Program  21  00 

Energy  Miser  24  50 

JUKEflOX  SERIES  FOR  PET  by  LC  CargHe 
Excellent  4  part  harmony  music— write  fof  list 

Automated  Simylations  (EPYX)  Fanlasy  Games 


PAPER-MATE 
60  COMMAND 

WORD 
PROCESSOR 


i'     - 


Paper-Mate  is  a  full-featured  word  processor 
lor  S29  00  by  Micfiael  Riley  Paper-Male  incor- 
pofales  60  commands  to  give  you  full  scfeen 
editing  with  graptiics  lor  al!  1 6k  or  32K  PETs.  all 
printers,  and  disk  or  tape  drives  II  also  includes 
moslleaturesollhe  CBM  WordPro  III. plus  many 
additional  lealures 

For  writing  lext,  Paper-Mate  has  a  delmable 
keytward  so  you  can  use  eilfie'  Business  or 
Graphics  machines  Shift  lock  on  letters  only,  or 
use  keytward  shiti  lock  All  keys  repeat 

Paper- Mate  text  editing  includes  lloating  cur- 
sor, scroll  up  or  down,  page  forward  or  back,  and 
repeating  insert  and  delete  keys  Text  Block 
handling  incluOes  transfer  delete  append,  save 
load  and  inseri 

All  lormalting  commands  are  imbedded  m  text 
for  complete  control  Commands  include  margin 
cofltrol  and  release,  column  ad|ust,  9  tab  settings, 
variable  line  spacing,  lustify  text,  center  text,  and 
auto  print  lorm  letter  Ivanable  blockl  Files  can  be 
linked  so  Ihat  one  command  prints  an  entire 
manuscripl  Aulo  page,  page  headers,  page 
numbers,  pause  al  end  of  page  and  hyphenation 
pauses  are  included 

Unlike  most  word  processors  PET  graphics  as 
well  as  lext  can  be  used  Paper-Male  can  send 
any  ASC1 1  code  over  any  secondary  address  to 
any  printer 

Paper-Male  works  on  16K  or  32K  PETs  with 
any  ROM  cassette  or  disk,  and  CBM  or  iion- 
CBM  printers  An  8K  version  is  in  ttie  planning 

To  order  Paper-Mate,  specify  mactiine  and 
ROM  type 

On  Tape  (with  manual): S29.95 

On  Disk  (with  manual) S3Z.95 

Manual  Separate  i  1.00 


KMMM  Pascal  for  PET/CBM        $75 

Asubset  of  standard  Pascalwithextensions  •  Ma- 
chine Language  Pascal  Source  Editor  •  Macfiine 
Language  P-Code  Compiler  •  P-Code  Interpre- 
ter (for  debugging  and  learning)  •  P-Code  to  ma- 
chine language  translator  for  optimized  object 
code  •  Run-tinne  package  •  Floating  point  cap- 
ability •  User  manual  andsampleprograms  •  In- 
cludes source  code  editor 
Specify  ROM  ve  rs  ion  ( 1 6  K  minrmu  m),  disk  or  ta  pe. 


EARLforPET(diskfile  based)      $65 

Editor,  Assembler,  Helcx;ater,  Linker.  Generates 
relocatable  object  code  using  MOS  Technology 
nnnemonics. 

Disk  file  input  (can  edit  files  larger  than  memory). 
Links  multiple  object  programs  as  one  memory 
load.  Listing  output  to  screen  or  printer.  Enhanced 
editor  operates  in  both  command  mode  and  cursor 
oriented  "window"  mode. 


SUPERSORT  by  James  Strasma  $35 

Supersort  is  an  excellent  general  purpose  machine 
language  sort  routine  for  PET/CBM  computers. 
Sorts  both  one  and  two  dimensioned  arrays  at 
lightning  speed  in  either  ascending  or  descending 
order.  Other  fields  can  be  subsorted  v^hen  a  match 
is  found,  and  fields  need  not  be  in  any  special  order. 
Sort  arrays  may  be  specified  by  name,  and  fields 
are  random  length.  Allows  sorting  by  bit  to  provide 
8  categories  per  byte.  The  routine  works  with  all 
PET  BASICS,  adjusts  to  any  memory  size,  and  can 
co-exist  with  other  programs  in  high  memory. 


Self  Calculating 
DATA  BASE 

REPORT  WRITER 

CBM  ptT  c,on,o„,.,<  -  MAILING  LIST 
Flex  File  IS  a  set  ol  flexible,  friendly  programs  to  allow  you  to 
set  up  and  maintain  a  data  base  as  well  as  print  liles  witti  a 
versatile  Report  Writer  or  a  Mail  Label  routine.  Programmers 
will  find  it  easy  to  add  subroutines  to  their  own  programs  to 
make  use  of  Data  Base  liles. 

RANDOM  ACCESS  DATA  BASE 

(feeord  size  limit  is  250  cbaracters.  The  number  ol  records 
per  disk  is  limited  only  by  the  size  of  each  record  and  the 
amount  of  free  space  on  ttie  disk  File  maintenance  lets  you 
step  forward  or  backward  through  a  lile.  add.  delete  or 
change  a  record,  go  to  a  numbered  record,  or  find  a  record 
from  a  specified  field.  The  Find  command  locales  any  record 
when  yoti  enter  all  (or  a  portion  of)  the  desired  key  field. 
Field  lengths  can  vary  from  record  to  record  provided  the 
sum  of  the  fields  does  not  exceed  the  size  of  ttte  recwd  This 
allows  maximum  packing  of  information  The  (ile  can  be 
sorted  by  any  field.  Any  field  can  be  specilied  as  a  key  field 
at  any  time  Sequential  files  from  other  programs  can  be 
converted  to  random  liles.  and  random  can  be  converted  to 
sequential.  Maximum  record  size,  fields  per  record,  and 
order  ol  fields  can  tie  changed  at  any  time 


MAIUNG  LABELS 

When  record  size  is  1 27  characters  (typical  for  mailing  list), 
each  disk  can  handle  over  tOOO  records  (about  2800  with 
the  8050  drive).  Labels  can  be  printed  any  number  ol  labels 
across,  and  in  any  column  position.  Any  numberolfields  can 
be  printed  on  a  label  in  any  order,  and  two  or  Itiree  fields  can 
be  joined  together  on  one  line  (like  first  name,  last  name,  and 
title)  A  "iyoe  o(  customer"  Held  allows  selective  printing 
REPOHT  WRITER 

The  contents  o(  any  held  can  be  placed  in  any  column. 
Numerics  can  be  decimal  point  justified  and  rounded  to  any 
aauracy  Any  column  can  be  defined  as  a  senes  ol  math- 
ematical functions  performed  on  other  columns,  Tfiese 
hjnctions  may  include  +.  —.  *./  . "'».  and  vanous  log  and 
trig  functions  Results  Ol  operations  such  as  running  total 
may  be  passed  Irom  row  to  row.  At  the  end  of  the  report  a 
total  and/or  average  can  be  calculated  for  any  column 
Complele  record  selection,  including  field  within  range, 
pattern  match,  and  logical  functions  can  tie  specified 
individually  or  in  combination  with  other  parameters 

Rti  File  was  ile«eio|teil  by  Mlitliael  Riley. 

FIcii  File  System  SGO 

Specify  machine  size  |32K  recommendedl  and  ROM  type 
tor  both  disk  and  computer 


Good  things  coming! 

VIC  20  Computer  with  Color  Graphics 

CBM  8096 

CBIv!  Single  Disk  Drive 

Sfvl-KIT-a  "super  toolkit"  for  PET/CBfvl  40/80 
column  BASIC 4.0 machines.  Includes allthe stand- 
ard functions  in  mucin  enhanced  fashion,  plusdisk 
commands  (including  Disk  Merge  and  DOS  Sup- 
port), Screenprint,  etc. 


SAVE  ENERGY 

with 

Commodore  Programmable 

Thermostat 

Installs  easily  in  place  of  your  existing 
unit  to  save  up  to  30%  on  your  heating/ 
cooling  bills. 

Introductory  SPECIAL  S1 14 


11  5  E.  Stump  Road  ■ 
Montgomeryville,  PA  1 8936 


215-822-7727 


A  B  Computers 


WRITE  FOR  CATALOG 

Add  $1 .25  per,  order  for  shipping.  We  pay  balance 

of  UPS  surface  charges  on  alt  prepaid  orders. 
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THE  STAR  MODEM 

From  Livermore  Data  Systems 


RS232  MODEM 
IEEE  488  MODEM 

RS232  CCin 
IEEE  488  CCin 


SALE  $135 
SALE  $199 

$170 
$280 


STAR  Modem  is  Ihe  price  performance  leader  with  a  lull 
2  YEAR  FACTORY  WARRANTY 


WE  CARRY  THE  BLACK  APPLE 


'  Bell&Hdujell 

VADl    I  ILUJSIVI  1»  ftiH  mil  I,  HOAIIl   in 

'  cipplG  computer  inc. 


EBS  Business  System  for  PET/CBM         $795 

Extrernely  comprehensive  package  lor  small  txjsmess 
Fully  integrated  inventory  and  accounts  receivable  system 
including  invoices,  packing  stips,  mail  lalKls.  staiements. 
t]ank  deposit  slips,  and  1 7  reports 

Tiny  Mill  Ust  lor  PET  BASIC  3.0  $1Z 

Clever  disk  based  package  by  LC.Cargile.  Uses  overlays 
lo  avoid  Qartage  colleclion  delays 

DISK  MASTER  by  Robirt  Baktr  $12 

Compretiensive  diskette  cataloQiiS  package  to  keep 
track  of  all  programs  atK)  files  on  up  to  140  diskettes. 
Specify  2040/4040/805Q. 


PROGRAM  YOUR  OWN  EPROMS 

Branilliig  Iron  for  PET/CBM  $79 

EPRDM  Pragi^mmer  with  iMwin  tor  all  ROM 
versions.  Iiii:ltjdes  all  neceisary  litrilwaFe  anti  sottwat^ 
to  program  or  copy  Z716  and  Z53Z  EPROMS, 


FORTH  lor  PET/CBM  or  Apple 


$65 


A  lul I- leatored  F 0 RT H  wttti  extensions  conforming  to  Forfti 
Interest  Group  standards  Induces  assembler,  stnng  process- 
ing capab  lities.  disk  virtual  memory^mullipfe  dimensioned 
arrays.  Iloatmg  point  and  integer  processing 


MIPLOT  Intelligent  Plotter 
by  Wstanabe  Instruments  |Digiplot) 

SPECIAL 
$1145 


Has  all  inteHigent  functions  (or  producing  graphs  and 
drawings  irxiluding  8  vector  and  4  character  commands. 
Solid  arx)  bfo!;Bn  lines  can  be  specified  Ctiaracter  gen- 
erator for  alptia,  numeric,  and  symbols  Characters  can  be 
rotated  in  4  orientations,  and  can  be  1 6  sizes  Coordinate 
axes  drawn  by  specifyinggraduation  interval  and  number 
of  repehtions.  Parallel  ASCII  interface,  f  1  k  f7  paper 


SPECIALS 

EPSON  MX-SD  Frfltir 

EPSON  MX-70  Prfatir 

STARWRITER  Daisy  Wheel  Printer 

SI  390 

Centronics  737  Printfif 

725 

NEC  Spinwriler 

2500 

Diablo  630  Daisy  Wheel 

2150 

Leedex  Video  100  12"  Monitor 

135 

ZENITH  DATA  SYSTEMS 

Z1 9  Video  Terminal  (factory  assem.) 

729 

Z89  with  48K  |lactor>  assem.) 

2150 

SVM-1  209 

SYM  BAS-1  BASIC  Or  RAE-1/2  Assemblef  85 

KTM-2/80  Synertek  Video  Board  349 

Seawell  Motherboard  -  4K  RAIvl  195 

Seawell  16K  Static  RAI^  -  KIIVI,  SYM,  AIM  320 


6502 
6502A 
6520  PIA 
6522  VIA 
6532 


7,45 
840 
5,15 
6,45 
7.90 


2114-L200  ns  RAM 
2114-L300  ns  RAM 
2716  EPfiOM  (5  volt) 
TMS  2532  EPROM 
4ll6-20()at  HAM 
S-100  Wire  Wrap 


10/6.95  50/6.55  100/6.15 

10/7.95  50/7.35  100/6.90 

10/4.90  50/4.45  100/4.15 

10/6-10  50/5.75  1D0/5.45 

10/7.40  50/7.0D  100/6.60 

3.75  25/3.5D  100/3.25 

3,15  25/2-90  100/2.65 

9,90  5/9-45  10/8.90 

23.50 

8  fir  29,00 

2,65 


^ 


commodore 


DISK 
SPECIALS 


CASSEHES  -  AGFA  PE-6II  PREMIUM 

High  output,  low  noise,  5  screw  housing  labels 
C-10  10/565      50/2500    100/4800 

C-30  10/7  30     50/34  00     100/6600 

All  other  lengths  available.  Write  (or  price  lisl. 


CBM-PET  SPECIALS 

A^^  Up  Id  S3I5  fne  mEnliiiidlu 

x£5'    oilli  purchise  nf  am  if 

V"       loikiwing  CBM-PET  llims:  FREE 

8032  32K  -  80  Column  CRT  S1795    31S 

8050DualDiSkDrive-950.000bytes  1795    315 

4016  Full  Size  Graphics  Keyboard  995    170 

4032  Full  Size  Graphics  Keyboard  1295  230 
32B  Business  Keyboard  -                        SPECIAL    800 

2040/404D  Dual  Disk  Drive  -  340K  1295    230 

4022  Tractor  Feed  Printer  795    MO 

GBM  Voice  Synthesizer  395      50 

C2N  Exte-nal  Cassette  Deck  95      12 

Used  CBM/PET  Compulers  CALL 

ViC  Personal  Computer  300  25 
WHITE  FOR  SYSTEM  PRICES 


SCOTCH  {3M|  5vr  10/2.85  50/2.75  100/2.65 

SCOTCH  (3M|  8"  10/2.90  50/2.80  100/2.70 

Verbatim  S'A"  10/2.45  50/2.40  100/2.35 

(add  1.00  (or  S'A"  Verbatim  plastic  storage  box) 

Verbatims"  Dbf  Dens      10/3.45  50/3,35  100/3.25 

BASF  S'A"  10/2.60  20/2,50  100/2.40 

BASF  8"  10/2-65  20/2-55  100/2-45 

WE  STOCK  IVIAXELL  DISKS 


Diskette  Storage  Pages 
Disk  Library  Cases 


8"  •  2.85 


10  for  3.95 
5"  -  2.15 


A 


ATARI  800    $745 

All  Atari  Modules  20%  OFF 


4  PART  HARMONr  MUSIC  SYSTEM  for  PET 

Tlic  Visible  Music  Monitor,  by  Frank  Levinson,  allows  you 
10  easily  enter,  display,  edit,  and  play  4  part  hamiony 
music.  Includes  whole  notes  thru  64ths  (with  dotted  aixf 
trtplets),  tempo  change,  keysignatitre,  transpose,  etc.  The 
KL-4M  unit  includes  D  to  A  converter  and  amplifier  (add 
your  own  speaker). 
KL-4M  Muilc  Siinl  mllli  VMM  Preinm  $59.90 


"*  EDUCATIONAL  DISCOUNTS  *** 
Bit  i  PET/CBM  Compiiferi.  nctUt  1  FREE 

WordPro  3+  -  32K  CBM,  disk,  printer  250 

WordPro  4+  -  8032,  disk,  printer  385 

OZZ  Data  Base  System  (or  CBM  8032  335 

VISICALC  for  PET  or  ATARI  170 

BPI  General  Ledger.  A/P.  A/R  (or  PET/CBM  270 

Programmers  Toolkit  -  PET  ROM  Utilities  34.90 

PET  Spaccmaker  II  ROM  Switch  3600 

2  Meter  PET  to  IEEE  or  IEEE  to  IEEE  Cable  4000 

Dust  Cover  lor  PET  6,90 

IEEE-Parallel  Printer  Interface  (or  PET  1 1000 

IEEE-RS232  Printer  Intertace  lor  PET  12000 

Thie  PET  Revealed  1700 

Library  of  PET  Subroutines  1700 

Source  Hoolnjp  over  1000  programs/services  88 


ATARI  EDUCATIONAL  PLAN      Writ,  lor  Hitiiii. 


A  P  Products    15%  OFF 
APKobby-Blox    15%  OFF 


ALL  BOOK  inJ  SOFTWARE  PRICES  PISCOUHTED 

The  8086  Book  (Osborne)                 '  14.00 

Z8000  Assembly  Language  Programming  16,90 

PET  Personal  Computer  Guide  (Osborne)  12,75 

PET  and  the  IEEE-48e  Bus  (Osborne)  13.60 

6502  Assembly  Language  (Osborne)  14.45 

Programming  fhe  6502  (Zaks)  1 0.45 

6502  Applications  Book  (Zaks)  10.45 

6502  Software  Cookbook  (Scelbii  9.45 

CP/M  Handbook  (w/  MP/M)  Zaks  1 1 .85 

Praclical  BASIC  Programs  (Osborne)  13.60 

Some  Common  BASIC  Programs  (Osborne)  12.75 


1 1 5  E.  Stump  Road 
tvlontgomeryville,  PA  1 8936 


21 5-822-7727 


A  B  Computers 


WRITE  FOR  CATALOG. 

Add  S 1  25  per  order  lor  shipping  We  pay  balance  o1  UPS  surface  charges 
on  all  prepaid  orders  Prices  listed  are  on  cash  discount  basis  Regular 
prices  slightly  higher 
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EPIDEMIC 

A  Simulation  Of  An  Epidemic 
In  A  Closed  Community 


Andy  Gamble 

Computer  Science  Instructor 
Columbia  College 
Vancouver,  BCV6J2A2 

It  seems  that  the  programs  most  readily  accepted 
by  students,  with  good  reason,  are  the  ones  that 
involve  an  element  of  competition.  How  many 
times  have  you  seen  programs  that,  while  advertised 
as  simulations,  are  no  more  than  textbooks  written 
for  the  screen?  The  amount  of  student  involvement 
is  often  limited  to  a  'Press  any  key  to  continue'  or  to 
a  few  multiple-choice  questions. 

EPIDEMIC  operates  in  the  realm  of  instruction 
and  hypothesis-testing  and,  although  the  subject 
matter  would  seem  to  belie  it,  a  certain  amount  of 
competitive  fun.  This  competition,  by  the  way,  is 
on  an  individual  basis,  a  kind  of  see-if-I-can-beat- 
the-machine,  similar  to  the  way  HAMURABI 
works. 

The  program,  through  the  use  of  PET  graph- 
ics, illustrates  how  a  disease  could  spread  in  a 
closed  community.  Given  such  a  community,  as  for 
example  an  island  with  no  physical  connection  to 
the  world  outside  (are  there  any?),  what  are  the 
parameters  affecting  the  epidemic?  The  islanders 
move  about  randomly,  infecting  others  if  able  to 
do  so.  The  disease  itself  lasts  for  a  specified  amount 
of  time,  otherwise  it  is  certain  that  all  islanders  will 
contract  it.  After  this  time,  an  infected  person  will 
become  uncontagious,  and  also  immune  from 
further  infection. 

The  RUN  of  the  program  prompts  the  user 
for  such  input  as  the  number  of  inhabitants  on  the 
island,  the  number  originally  infected  and  the  time 
for  which  the  disease  is  contagious  (lines  180-250). 

Each  person  on  the  island  is  inspected  to  see 
if: 

1)  he  is  starting  his  period  of  infection.  At  this 
point  a  random  move  (or  no  move  at  all)  is  made 
(lines  500-520,  900-980  and  1000-1040).  Note  that 
no  one  is  allowed  to  move  off  the  island. 

2)  he  is  able  to  infect  his  immediate  neighbors 
(lines  540  and  1060-1140) 

3)  he  is  infected  by  his  neighbors  (lines  560  and 

1 160-1240).  This  will  only  happen  if  he  has  not  yet 
been  infected. 

4)  his  period  of  infection  has  finished  (Hues  580- 
620).  He  now  passes  into  the  immune  category. 


The  program  continues  until  there  are  no 
more  infected  people  on  the  island  (line  660).  A 
bar  chart  is  then  presented  which  summarizes  the 
history  of  the  disease  (hnes  680-810). 

The  shape  of  the  island  is  obtained  from  the 
DATA  statements  1670-1710,  and  can  easily  be 
changed  to  suit  your  locale  if  you  wish. 

A  further  change  could  be  a  random  element 
acting  so  that  it  is  not  absolutely  certain  that  an 
islander  will  become  infected  if  in  contact  with  a 
diseased  neighbor.  Lines  1 160-1230  would  become 

1160  IFPEEK(PP(I)-41)=COTHENIFRND- 
(l)».5THENPOKEPP{I),CO  etc. 

for  a  50%  chance  of  being  infected. 

Here  is  the  challenge:  given  a  constant  number 
of  inhabitants,  what  is  the  smallest  number  of  in- 
fected people  which  insures  that  all  will  become 
infected?  This  makes  a  nice  problem  in  statistics,  if 
you  want  to  go  that  far,  but  it  is  enjoyable  to  obtain 
experimental  evidence  from  this  program.  That, 
after  all,  is  what  simulations  are  for. 

The  program  will  run  on  new  and  old  roms, 
and  uses  less  than  6K  as  given. 


100  REM  EPIDEMIC  :  ANDY  GAMBLE,  AUG  80 
110  ;:,r  COLUMBIA  COLLEGE, 1619  VJ10  AVE 

-.  VANCOUVER  BC  V6J  2A2 
120  I=RND(-RND(0) ) :POKE59468,12 
130  POKE59458,62:REM  SPEED  POKE 
140  T$=  "^t^^^tttt^t^tt^iitti^t'<^i^" 
150  QP=515 :QA=126: IFPEEK(50000)THENQP=15 

-.1:QA=44 
160  IG=160:VI=215:CO=209:GI=170 
170  GOTO1360 
180  PRINTCHR$(147)  "HOW  MANY  ISLANDERS  -. 

-.(<=100)  ?";  :GOSUB1720:NP=VAL(Z1$) 
190  IFNP=0THEN180 

200  IFNP>100THENPRINT"TT"; ;GOTO180 
210  PRINT "^^HOW  MANY  INFECTED  AT  -. 

-.START?";  :GOSUB1720  :  NI=VAL  (  Zl$) 
220  IFNI=0THENPRINT"TT"; :GOTO210 
230  IFNI>NPTHENPRINT"TT"; :GOTO210 
240  PRINT"^CONTAGION  TIME  (DAYS)?";: 

-.GOSUB1720:CT=VAL(Z1$) 
250  IPCT=0THENPRINT"Tt"; :GOTO240 
260  RESTORE 

270  PRINTCHR$(147) : FORI=lTOl 8 : READIL , IR 
280  FORJ=ILTOIR; POKEJ , IG : NEXT: NEXT 
290  PRINT"lLLWr=UNINFECTED   jiijf =C0NTAGIOU 

-.S  x*r=  IMMUNE" 
300  PRI NT "Mti'llif'tiii'^^i^^t'^t^i^CONTAG ION " 
310  PRINT"liititHH'i't^^^ttt^t^tTIME  "CT; 
320  IFCT>1THENPRINT"  DAYS" :GOTO340 
33  0  PRINT"  DAY" 

340  REM  GARBAGE  COLLECTION  FOR  ARRAYS 
350  P0KEQA+2,PEEK(QA)  :  POKEQA-l-3  ,  PEEK  (QA+1 

-.)  :29  =  FRE(CI) 
360  DIHPP(NP) ,PG(NP) ,DC(NP) ,NI(50) , 

^IM(50) 
370  F0RI=1T0NP:PG(I)=VI:NEXT 
380  F0RI=1T0NI:PG(I)=C0:NEXT 
390  FORI=1TONP:DC(I)=0:NEXT 
400  F0RI=1T0NI:DC(I)=CT:NEXT 
410  F0RI=1T0NP 


Perfectly  Balanced 


educational  softwcire 


MICRO-ED 


More  than  200  instructional  programs 


Unless  otherwise  specified,  each  one  can  be 
purchased  for  ^7.95 


You  may  wish  to  order  tapes  by  the  MICRODOZEN.  Any  twelve  S7.95  tapes  can  be 

purchased  for  S84.00. 


All  programs  u/ork  with  any 
8K  PET.  old  or  new. 


Send  for  free  catalogue: 
MICRO-ED,  Inc.  •  P.O.  Box  24156  •  Minneapolis,  MN  55424 
or  telephone  us  at  (612)  926-2292 


PET  is  the  registered  trade- 
tDark  for  Commodore  Busi- 
ness Machines.  Santa 
Clara,  CA. 
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'INFECTION" 


420    PP(I)=inT(690*RND{l)i-32901)  : 

-.IFPEEK{PP(I)  )  OIGTHEN420 
430    POKEPPd)  ,PG(I)  :NEXT 
440    ND=0 
450    IM=0:PRINT"lii^"TABC7)NP-NI-IM;TAB(20) 

-.NI;TAB(30)  IM 
460    PRINT"MttDAY";ND 
470    ND=ND+1:NI=0:IM=0 
480    F0RI=1T0NP 

4  90    REM    NEW    CONTAGIOUS    FROM    LAST    TIME 
500    IF(PEEK(PP(I) )=C0) AND(PG(I)=VI)THEND 

-.C(I)=CT 
510    PG(I)=PEEK(PP(I)  ) 
520    ONINT(9*RND(1)+1)GOSUB900,910,920, 

-.930,940,950,960,970,980 
530  REM  INFECTING? 
540  IFPG(I)=COTHENGOSUB1060 
550  REM  INFECTED? 

570  REM  ONE  DAY  LESS 

580  IFPG(I)=C0THENDC(I)=DC{I)-1 

590  REM  END  CONTAGION 

600  IFDC(I)<0THENPG(I)=GI:POKEPP(I) ,GI 

610  IFPEEK(PP(1) >=C0THENNI=NI+1 

620  IFPEEK(PP(I) )=GITHENIM=IM+1 

630  NEXT 

640  IFND<=50THENNI(ND) =NI : IM (ND) =IM 

650  PRINT"hi"TAB(7)NP-NI-IH"<   ";TAB{20) 

-.Nl"4   ";TAB{30)  IM"-t   " 
660  IFNI>0THEN460 
670  PRINTT5; :GOSUB1250 
680  PRINTCHR$(147) "DAY"TAB(5) 

-.:PRINT 
690  FORND=1TO50 
700  FORWT=1TO15  0:NEXT 
710  PRINTND;TAB(4) ; 
720  PRINTNP~NI(ND)-IM(ND) ;NI(ND) ;IM(ND) : 

-.PRINT 
730  1FNP-NI(ND)-IM(ND)=0THBN750 
740  F0RI=1T0NP-NI (ND)-IM(ND) :PRINT"rW"; : 

-.NEXT 
750  IFNI(ND)=0THEN770 
760  F0RI=1T0NI(ND)  :  PRINT"j:iJ"  ;  :NEXT 
770  IFIM(ND)=0THEN790 
780  F0RI=1T0IM(ND) : PRINT"r*" ; : NEXT 
790  PRINT 

800  IFNI(ND)=0THEN820 
810  PRINT iNEXTND 
820  PRINT"i^LIKE  TO  SEE  THE  CHART  AGAIN  -. 

-.(Y/N)?",-:GOSUB1720:Q$=Z1$ 
830  IFQ$=""THENPRINT"TT"; :GOTO820 
840  IFLEFT$(Q$,1)="Y"THEN680 
850  PRINTCHR$(147)LEFT${T$,10)  "WANT  -i 

-.ANOTHER  TRY  ( Y/N)  ?"  f  :GOSUB1720  : 

-iQ$=Zl$ 
860  IPQ$=""THEN850 
870  IFLEFT${Q$,1)="Y"THEN180 
880  END 

890  REM  MOVE  S/R'S 
900  MV=39:GOSUB1000 :RETURN 
910  MV=40:GOSUB1000:RETURN 
920  MV=41:GOSUB1000:RETURN 
930  HV=-1:GOSUB1000: RETURN 
940  MV=0:GOSUB1000: RETURN 
950  MV=1:GOSUB1000: RETURN 
960  HV=-41:GOSUB1000: RETURN 
970  MV=-40:GOSUB10O0: RETURN 
980  MV=-39:GOSUB1000:RETURN 
990  REM  MAKE  MOVE 
1000  IFPEEK(PP(I)+MV)  OIGTHENRETURN 


1010 
1020 
1030 
1040 
1050 
1060 

1070 

1080 

1090 

1100 

1110 

1120 

1130 

1140 
1150 
1160 
1170 
1180 
1190 
1200 
1210 
1220 
1230 
1240 
1250 

1260 
1270 
1280 
1290 

1300 


1310 
1320 
1330 


1340 
1350 
1360 

1370 

1380 
1390 

1400 
1410 

1420 

1430 


1440 
1450 
1460 
1470 

1480 


-40)=VITHENPOKEPP(I)-40 

-39) =VITHENPOKEPP(I) -39 

I-  1)=VITHENP0KEPP(I)-  ^ 

1+  1)=VITHENP0KEPP(I)+  -. 

I +39) =VITHENP0KEPP ( 1} +39 

=VITHENPOKEPP(I)+40 


,C0 

,co 


PG(I)=PEEK(PP(I) ) 

POKEPP(I) ,IG 

PP(I)=PP(I)+MV 

POKEPP (I) , PG { I ) : RETURN 

REM  INFECTING  OTHERS 

IFPEEK(PP(I)-41)=VITHENP0KEPP(I)-41 

-.,C0 
IFPEEK(PP(I) 

-.,C0 
IFPEEK(PP(I) 

-.,C0 
IFPEEK(PP(I) 

-.1,C0 
IFPEEK(PP(I1 

-il ,  CO 
IFPEEK(PP(I1 

-.,C0 
IFPEEK(PP(r}+40)^ 

-.,C0 
IFPEEK(PP{I)+41)=VITHENP0KEPP(I)+41 

-.,C0 
RETURN 

REM  INFECTION  FROM  OTHERS 
IFPEEK ( PP ( I) -41 ) =COTHENPOKEPP ( I) , CO 
IFPEEK ( PP ( I) -40 ) =COTHENPOKEPP (I) 
IFPEEK(PP(I)-39)=COTHENPOKEPP(Il 
IFPEEK (PP( I)-  1)=C0THENP0KEPP(I) , CO 
IFPEEK(PP(I)+  1)=C0THENP0KEPP(I) , CO 
IFPEEK ( PP ( I) +3  9} =C0THENPOKEPP ( I )  , CO 
IFPEEK(PP{I)+40)=COTHENPOKEPP{I) , CO 
IFPEEK ( PP ( I) +41 ) =COTHENPOKEPP ( I ) , CO 
RETURN 
PRINT"     rPRESS  ANY  KEY  TO  -■ 

-.CONTINUE" 
GETQ$:IFQS=""THEN1260 
RETURN 

REM  NP=#  OF  PEOPLE, NI=#   INFECTED   - 

IM=#  OF  IMMUNE 
REM  CT=DAYS  FOR  CONTAGIOUS, 

-.IG=  ISLANDGRAPHIC, 

-.PP=POS  OF  PEOPLE 
REM  ND=#  OF  DAYS,VI=NOTYETINFECTED 
REM  CO=CONTAGIOUS, PG=PEOPLEGRAPHIC 
REM  GI=GRAPHIC  IMMUNE, HV=MOVE, 

-iDC=  DAYS  OF  CONTAGION  -. 

-.LEFT 
REM*********************  ********** 
REM  TITLES 
PRINT"R":FORI=32768TO32807 : 

-iPOKEI ,  224  :  POKEI+960  ,  224  :  NEXT 
FORI=32808TO336  88STEP40:POKEI,224: 

-.POKEI  +  39,224:NEXT 
PRINT  "ll^i^^^^" 

PRINTTAB(9)"   M^       L 
PRINTTAB ( 9 ) "   L$: : : : : :MNLLLLNM 
PRINT "lit^^ii'^^f'^t^ti" TAB  (14)  "jiEPIDEHIC 

TT 

-I 

PRINT"iiti^ii't^^^iTj"|'t^i^"TAB(25)  "ANDY  -. 

-.GAMBLE" 
PRINTLEFT${T$,20)TAB{5) ;"D0  YOU  i 

-.NEED  INSTRUCTIONS  (Y/N)?";: 

^GOSUB1720:Q?=S1$ 
IFQ$=""THEN1430 
IFLEFT$(Q$,1) <>"Y"THEN180 
REM  INSTRUCTIONS 
PRINTCHR?(14  7)  "AN  EPIDEMIC  HAS  -. 

-.BROKEN  OUT  ON  A  SMALL  " 
PRINT"  ISLAND.  THE  DISEASE  IS  NOT  -. 

-iFATAL,  AND" 
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You  can  count  on 

Pet  Professor 

to  help  increase 
teaching  effectiveness 


I 


/ 


It  reteaches  the  4  basic  arith- 
metic operations  step-by-step. 

PET  PROFESSOR  includes  77  programs  that 
reteach  the  four  fundamental  arithmetic  opera- 
tions for  whole  numbers,  fractions  and  decimals 
by  providing  more  than  just  practice  drills,  Each 
program  includes  a  complete  tutorial  sequence 
that  takes  a  problem  apart,  then  leads  the  student 
step-by-step  through  solving  it. 

Each  program  covers  a  single  objective  to 
allow  the  teacher  to  select  the  skill  to  be  rein- 
forced. It  states  the  objective,  supplies  vocabulary, 
displays  an  example,  then  leads  the  student  step- 
by-step  through  other  examples.  When  the  student 
is  ready,  a  quiz  requiring  writing  is  given,  then 
scored  by  the  computer.  Every  program  has  been 
carefully  selected.  All  problems  were  written  by 
teachers  and  tested  in  classrooms.. 

Use  PET  PROFESSOR  to  supplement  class- 
room instruction  in  individualized  or  traditional 
programs.  Available  for  PET  2001  Series.  Will  run 
within  8K  on  any  PET. 

■  Whole  numbers— 32  programs  @  $235.00 

■  Fractions — 24  programs  @  S  175.00 

■  Decimals — 21  programs  @  $175.00 

Buy  all  3  for  $499.00.  Save  $86.00! 

StTitl  ^5.00  for  more  info,.  Jiiin^pft'  liifjc  6  stiipping 
(dc'durtcd  frnni  tola!  ptlrt■^ul^ie), 

l.isl  of  oltier  educational  pmijram.s  avtijlahie  on  fequcst. 

Melad  Associates,  Inc. 

66  Main  Street,  South  River,  rS.J.  08882  •  (201)  238-7330 


By  Notronlcs 

ASCII/BAUDOT, 
STAND  ALONE 

Computer 
Terminal 


COMPLETE 
FOR  ONLY . 

n49 
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ThcNniQnics  ASCII/  BAUDOT  ConipjEcr  Tctminal  Kim 


ASCII/BAUDOT 
Computer  Terminal  Kit 

The  leybtMrti  fello*i  ihe  «aiidan)  typewriicr  corfig jralhon  «  "'  ^  '■ 
ind  gcncraier  the  enlirc  12H  characicJ  ASCM  upr»r/lowcr  cek  CsWftWUI  U.S.A.  Cfidit  Cud  BvTtn  ftHWl  CDnnicacut 

MM   wjlh  96  pimiJbte  churicim.   Fatuin  indude  oobo-rd       Q^[_[_  JQL|_  pf^E^  800-243-7428 


muldEoit,  i«l«ubk  piriry,  ifiiTt  lock  tcy,  alpha  lotk  jumper, 

t  dnvc  ca^biliiy  *f  0B<  TTY  Iswd.  and  [he  abilitf  lo  mi!- 

dirccily   ikitti  almoi!  u\y  nxnpuEtr.   iDCEudinf  ihE  ncf   i.\ 

pl««/IJ  and  ELF  prsidLai  by  Scrorucj.  .  Vrtmnlr.  UAH  r  irf     IWni 

includn  Ifc  oi  memotj.  characlcr  (flWf»tq*.  2  ^.ey  rotlovcr,  J  333  IJiehfitld  Roid,  \tl*  M 

piocesiOT  ioauoWcii  curwr  ccnirol,  V^^^  ^^^l!^^^^}  |  J**""*  H"*"^  '*^f  <"""  cktcked  below— 

.  ■"   *  I  □   NrlroAki  ^W■lJ  AloM  AStU  Koboprt/fcinpBiw 


,  To  Order  From  CorinectKut  Or  Pgr  Techmcjl 
A5SiSBnte.  E!C  Cal(2d3|354-«375 


.  MiMord,  CT  06776 


Id   i«fi*l  convefiJor   and  urial  lo  > 


I  pitKci^nt— fully  ■ 


O   Dduir  S^fH  CiMnci  Tgr  Naianici  Kcj^twaid/Tcrmi-    ■ 
ml  In  BlLicfilack  Finish,  SI9.99  Tiius  ».}0  poiii|c   | 


highol  C|ualily  jlfcis  epoxy  Toi  ll^e  uhimaic  in  icliahiljiy  and 
long  life. 

VIDEO  DItPLAY  BPCCIFICATlONS  "  and  ha^idLinj. 

The  heart  of  ihe  NeiFOFiio  Compjier  TcTfuiinal  ii  ific  micr©- 1  a  Vidro  Ubplaj  Boinl  Kil  ale 

priOce»»iC!jnliai:ed   Nclionia  VjJ«i   Display    Boaid  (V|D)  piui  I?  poilagr  i  harJtini 

*hich  alkiw*  Ihe  Iciminal  to  ulLliic  eilher  a  paioJkl  ^SCII  oi  ■  q  ,i..  vuto  MdpIIoi  (10  MHi  bandwidlh)  luily  aisem-    I 

BAUDOT  iianal  MMirce.  ^le  VID  ron'.cni  Itie  E^ratiel  daia  [t>-  y^j  ^^j  ,(,„((,  j|j9^^  p|m  jj  pomge  md  handling.    " 

KrialJiui-hichinheofoim>ncdloeiihriRS2J2.Cof20ria^|  ^  rj  Moddtator  ltiM«o  lim:  your  TV  tci  fon  rroniiorl.  1 

currral  loop  nulpul.  «fikt<  C»f>  bf  Mnnccied  lo  ihe  iciial  l>OP  „  „  poiinaid 

on  your  computer  or  oihei  inlcrracE.  i.e..  Mwlem  I  r-  *  '  p^T-  i;««Bjv   Kir   in   rk.ii.T.  <:.rri:  rshmrf   I 

Whfticonn«l(dioacompu[«.thcca™pui«mUiiechottwP  ^  f  '"^ Jfo*"  ^^PP^^  l^'  ""  il'^l" -^  J^  ^f,^"V^  ■ 

charaEfer  ic«=.ed.  Thii  dW  .*  r««ved  by  the  VlD  chichi  L!J^^.  f,f,^f "  P^"' ^"^  ^^*^'-  "*'*  P'"'  "  | 

10  b*  dlHiUy«J  on  a  TV  ici  tuiing  an  RF  modulatoi)  or  on  >|  Total  EnClOied  iConn.  rM_  add  laln  i«>  I ^.^  . 

vidcY)  RiDnitor.  The  VID  generates  the  cutiot,  hoTizonta)  ard|  By—  | 

veniiTJl  (yiKpuheiand  pciformMhe  h0UW!lwDirircliti»etO|  Q  Peiional  Chcci  d  CajhicisOietk/Morttr  Oldtf  - 

*.hii;li  (hiracier  and  *IWie  U  iHa  be  diipliyed  Ofl  th«  «:r«n.|  g  yiia  D  M»UM-Cbatie(Banh  f .„_)  | 

1 10  end  JOO  ASCII  *  0»ltWU;  ff5.VJ'ror.fi3  ma  nirrm^/iK^I 


.>ktyb04id).$l9,vS  I 


ASCII  dunetrr  i««1:  l2S  prsnlable  choticia— 


!•»•<*'()»♦,-. /M23456789;  ;<=>? 
HWXEFGHIJWJHlPasnMCWZW*. 
'  A  cd«  f  9Ki  j  klnnoMrstdwa  ^{1 H 


I  Si(naiur«_ 


S.Ki'.  Daw  _ 


SEaie Zip 


I 
I 
I 
I 
I 


NEW!!!-THE  ELECTRIC  MOUm 

tor  SIOO,  EH  II,  Apple, 
TRS-80LftvelU' 

From  tbUoaaO  kit 

Now  —  (each  your  com- 
pilfer  to  \aik,  dramaiiCtiWy 
increasing  (he  in(eracf»on 
bejfwfjiMi  yo\x  and  your 
machine. 

That's  rigKt:  iKe  ELECTRIC  MOUTH  ac-  Principle  ofOperalion  The  ELECTRIC 
lually  lets  your  computer  talk!  Inslalled  and  MOUTH  stores  words  in  Ihctr  diRilal 
i>n-SiniT  in  iust  minutes,  it's  ready  for  spoken-  equivalents  in  ROMs.  When  ^vofds,  phrasra, 
lanouaRe  use  in  office,  husiness.  induMria!  anrf  phonemes  are  desired.  Ihey  arc  simply 
and  commercial  application^i.  in  (jamcB.  r^|pd  for  by  your  program  and  then  svn- 
spccial  proiects.  RftD,  education,  becurily  ihesized  inlo  speech.  The  ELECTRIC 
deviccB  —  lheii-''s  no  end  to  Ihc  ELECTRIC  mquTH  sysleni  requires  noni?  nf  your 
MOUTH'S  usefulness.  Look  a  I  these  fea-   valuable  memor\'sp*^^'"^P' f'""  a  few  ad- 


tureK 

*  fkjpplted  with  113  Honti letters phnnfTrmnum- 
tKn.  CApabknl  producing  hundreds cfwuidf  and 

*  ti^pnndabk  pn-boafd  up  id  Ibumands  dT  wm6s 
arnd  phrjn^h  ||u&t  add  additional  tprrch  ROMh  «■> 
IIkv  brrumr  avaiUbir) 

"  F'lfur  nmdcK,  which  pluKdirTf:ll>inlnSloa,  Apptie, 
KII  l]  and  TRS-MJ  Uvpj  1!  comiiulcr*. 

'  (id  ii  rii  Ulk  by  U^trA  Hlhff  t^aeiir  m  n^iichine 
UniuuKi!  (vrr^  rosy  lo  U'W,  compiple  iiihlruiiiiinti 
Wilh  rHimpic^  included). 

'  Use*  Nillunil  Serrbiqonducior  ■S  "Digitatkiir" 

'  ]ntlude»  on-board  audio  amplifiGr  .and  sptraktr, 
Mill)  ptavisiont  for  exl^rnal  i^peaktr'^  and 
atnpJilin. 

*  Adtb  a  new  dimemskin  aj^d  Gscilmicnl  lo  prrj- 
Xraitintinjt:  kh  )  uu  modih'  r\blin}(  prdKram^  and 
gamn  tii  add  ^paken  annourKemeni-*  of  muil^, 
waminf«b  rM: 

'  Imlalb  in  ju«l  rninuUt. 

J-JJiriimJ  T/r-h>.lfir -M^ilt.  MJidji  |r..Vn«.jU,^ 
Wtnirui^JII'IJ  (ill  Mppii- "mi  ns.  Ijiniinti*  n(  AoA- 
V,'itwn>ut Int-  T?ei-«<l4i'«-Jfl"K'i;ns  mMfciiwdiuf 
Tupith-r;ir|i 


dresses  if  used  in  memory  mapoed  mo*ic.  In 
most  case?,  output  ports  (user  sel«:table|  arc 
used. 

Spoken  Maierial  Includnd 


NIVK 


Wiiirne 
Mwri-v 
iiiwiijwm 

iHlMI^NQ 
MlUJtltd 

AfWS 


l>]\\\ 
KUUAL 

FEL-r 


HhrreH 

MIUJ 


f.AVULL 


ruiw 

FUEL 

CALUIN  vusi; 

C*.t  MIMTTC 

'■A'!i:  rSAU.  \EAK 

'  '■^T  WEAT  NlfMBER 

H    II  BTZTlVSK  l^Rf^tFJt  OF 

fTZTlISi;    HAW  OFF 

-nifNcr:    lecii        tis 

■-^'it£>M>:  l(H:ltl.R 

....v->mXCE  lUXFk 

lEiQVlS!dLU(J^  l?C 

miKSILC>«CK  V>XH£S 

iXKn  IS 

PtH:k 


SKI 

^-rAK 

STAKT 
THE 

Tiw: 


lph«hi.Mi,,kii 


oin 

UhXH 

ivuE.vrHe;M%  vuci 

PU!AW 


\  TodrdiTl'ramCpnnBciicutnrroiTrchntcal.issisiBncr.Kic.,  Cflll  (203 1  3S4'9375  | 

I  frr^flnuiCliHrk      IJ  Cu^hlK't'^CIiech/Honet Order  i 

1  Vlu        '.  iVfHs|i;rCliirgcjBankND \ 

flixi.No = 

Slgn«l  lire Eip.  OBte 

Prim 

Namf  


^NKTRONICS  R&[)  LTD.Depl. 

■ija  Uirlirti-ld  Hud. New  iHlirDiU.  CT  0677(1 

■    J'li.K/   ^,■f;Jlf«■,p,|^•.rh.vfvJt;).■^llV 

•  MWIJriinrHomS-klt,..  1H.II 

*  li[tl'»r<lil[<ll«|U~LH  .......... ..iH.» 

■:     IpV^-LlnlrtElMalB-hil  ............. .SillJl 

^Z-  Tis*m*|ii'ElMincMHia-kiE si]«^u 

riA>i.i  Knci>t.f  niTi-ii  fcji-oni  uA^  A3  pj.»  nm 


..da  •. 


■  T.c^K»^> 


Address  _ 

CHy 


m- 
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1490  PRINT"ONCE  CONTRACTED  PROVIDES  ^ 

-.IMMUNITY  FOR    LIFE." 
1500  PRINT:  PRINT"YOU  ARE  ALLOWED  TO  -. 

-iCHOOSE  CERTAIN  " 
1510  PRINT"INITIAL  CONDITIONS :": PRINT: 

->PRINT:PRINTTAB(5)  "THE  ISLAND  -. 

-.POPULATION" 
1520  PRINT:PRINTTAB(5)  "THE  NUMBER  -i 

-.ORIGINALLY  INFECTED" 
1530  PRINT:PRINTTAB(5)  "THE  NUMBER  OF  -. 

-iDAYS  FOR  WHICH  THE" 
1540  PRINTTAB  (5)  "DISEASE  IS  CONTAGIOUS  -. 

-.-  THIS  IS" 
1550  PRINTTAB  (5)  "ALSO  THE  DURATION  OF  -. 

-.THE  DISEASE." 
1560  PRINT:  PRINT  :PRINT"THE  ISLANDERS  -. 

-.WILL  MOVE  ABOUT  RANDOMLY," 
1570  PRINT" INFECTING  OTHERS  IF  CONTAGIOU 

Sn  . 
.  ; 

1580  PRINT"THOSE  WHOARE  IMMUNE  WILL  NOT  -. 

-.BE   INFECTED.  " 
1590  PRINT:  GOSUB1250 
1600  PRINTCHR$  (147)  "THIS  WILL  CONTINUE  -. 

-.UNTIL  THE  DISEASE  HASRUN  ITS  -. 

-.COURSE  "; 
1610  PRINT"  (UNTIL  THERE  ARE  NO  MORE  -. 

-.INFECTED  PERSONS)." 
1620  PRINT:  PRINT" YOU  WILL  THEN  BE  GIVEN  -. 

-.A  DAY-BY-DAY  BAR  CHART  OF  THE  "; 
1630  PRINT"HISTORY  OF  THE  EPIDEMIC,  " 
1640  PRINT"UP  TO  A  MAXIMUM  OF  50  DAYS." 
1650  PRINT:GOSUB1250 
1660  GOTO180 

1670  DATA32902, 32911, 32940, 32955 
1680  DATA32978, 32996, 33015, 33040,33050, 

-.330  83,33  090,33123,33130,33162 
1690  DATA33171, 33203, 33213, 33244, 33254, 

-.33285,33297,33325 
1700  DATA33337, 33362, 33376, 33398, 33417, 

-.33437,33459,33475,33501,33515 
1710  DATA33544, 33556, 33585, 33592 
1720  Z$="":Z1$="" 

1730  PRINT"i.«";  :  FORI=1TO50  :  NBXTI 
1740  PRINT"  «";:FORI=1TO5  0:NEXTI 
1750  GETZ$: IFZ$=""THEN1730 
1760  IFZ5<>CHR${20)THEN1810 
1770  IFZ$=""THEN1730 
1780  ZZ=LEN(Z1$) :IPZZ<1THEN1730 
1790  Z1$=LEFT$(Z1S,2Z-1)  :PRINT"-«",- 
1800  GOTO1730 

1810  IFZS=CHR$(13)ORZS=CHR$(141)THEN1850 
1820  PRINTZ?; 
1830  Z1$=Z1?+Z$ 
1840  GOTO1730 

1850  FORI=1TO10:GETZ$:NEXTI 
1860  PRINT 
187  0  RETURN  @ 

Odds  &  Ends  on  the  2040  Disk 

Jim  Butterfield 

Verify  works  this  way:  all  blocks  on  disk  are  freed. 
Then  the  processor  works  through  the  files  in  the 
directory,  one  by  one,  and  re-allocatcs  the  blocks  it 
finds  in  use  there.  You  should  not  verify  a  disk  that 
contains  direct  files  unless  special  provision  is 
made  to  allow  this.  Otherwise,  the  l^locks  will  be 
freed  and  not  re-allocated  —  which  means  trouble. 


TISIS   AD    WAS    PRltJTKD   ON    A   BiayMatia 
THE    INTELLIGENT   PRINTER 
Tfiis    line    is    prinled   with    proporlional    spacing. 

This    lint    i^   pfil^ted   at    IS   cii3rj:teri   per    inch.      Nate    thr   snallpr    characters. 

This    Li.ne    is    printL-d   aL    12    i^haracters    per    inch. 

This  line  is  printed  at  10  characters  per  inch. 


The   »:«'<?. I3H^   is    able    to   print    with    foreign   character   notations 
without   changing    the    printwheel, 

£f.55(iai6ueWn;   j 

Interested? 

It    will    also   automatically   Underline   without    retracing   the    line. 
It    will   even   print    in    bold   face   and    bold   face   underline   and 
i33BSffi.      A   wide   variety   of   type    fonts    are    available   and    the 
XYMEC    is    shipped    with    four    print    wheels.      The   XYMEC    is   co- 
vered  by    a    90   day    limited   warranty.      Off-line   the    XYMEC    is 
a    High    Quality    Electronic    Typewriter   with   a    memory. 

The    XYMEC    is    available   with   the    following    interfaces: 

t  ISI  Until    6-30-Bl 

Centronics   779 $2,650.00    .    .    $2,125.00 

IEEE-i88    (GPIB) 2.725.00    .    .      2,175.00 

RS-232C    2,875.00    .    .      2.295.00 

LED    DISPLAY    (option) 200.00 

TRACTOR    FEED    (option) 350.00 


Please     34i     $?0.0Q     for    shipping    2fi  d    handling. 

International   tustoners  Mpite  for   ordering    inFor«3tion. 

flrijona    residents     add    SS    sales     tan. 

Cashier's    checi*    for    24    hsur    shipment. 

E.    Ch,    U. 
238   West    33rd    Street 
TUCSON.    AZ.    85713 


This  offer  expires  June  30.  I9E1 


Dealer 


nquirics  invited 


MATHEMATICS,  BASIC  SKILLS 
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all  individualized,  indass  and  homework  requirements  for  drill  in  arithe- 
metic.  Students  work  directly  upon  exercise  sheets.  Difficulty  level  is  easily 
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Please  add  SI  .SO  for  postage  and  handling. 

T'AIDE  SOFTWARE  COMPANY 
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GALAXY 
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captive  worlds. 
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computer  stocks. 


ENCRYPT 


ALIEN 
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massages. 

Protect   the    federation.      Real   time  3-D 
navigation.  • 


All   are  User-tested  with  HELPS  Multi-player  games  hove  Single-player  option 

Each  .  .  .      Cassette  114.95        Diskette  J19.95 

'  •    one-player 
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1-512-477-2287 
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EPROM   PROGRAMMERS 


EP-2A  SERIES 

•  PROGRAMS  2706  and  2716 
EPROMS 

•  Price  $59.95  .■^iserTiblcd  and 
Tnstod 

•  Kil  prirp  $49.95 

'  Includes  Conneclor 


£P-2A-7e  SERIES 
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2758,    IMS    2716    ,ind    TMS 

2532  EPRO.MS 

TEXTOOL    ZERO    FORCE 

SOCKET 

Prite  $79.95  Assembled  and 

Tested 

Includes  Connector 


Software  available  tor  the  Rockwell  AIM-6S,  MOS  Tectinology 
KIM-1,  Synertek  SYM-1,  Motorola  D2,  RCA  VIP  and  many  oltier 
single  board  computers  that  use  the  6502,  6800,  8080/65,  Z-80. 1302, 
E-a  jnd  2650  CPU's.  Stock.  Specify  one  set  of  software. 

Optimal  Technology  Inc. 

Blue  Wood  127 

Earlysville,  VA  22936  U.S.A. 

Phone  (B04)  973-5482 


HARD  WORKING  SOFTWARE 

for  PET/CBM  operating  systems  1.0  to  3.0 

TM 

MATRIC  expands  Commodore  BASIC  witti  fourteen  new 
commands  tor  handling  arrays.  Algebraic  style  syntax. 
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Specify  size  and  ROM  set  of  your  machine.  Tape  or  disi<, 
32-page  manual.  Price:  $125. 

TM 

PRO-GRESS  multiple  regression  BASIC  program  reads 
unlimited  records  from  tapes  orCBM  disk.  Up  to  45  variables 
in  32K.  Permits  transformations.  Provides  means,  standard 
deviations,  correlations;  R,  R-square,  F,  degrees  of  freedom; 
constant  and  coefficients,  betas.  Student's  t's.  Output  to 
screen,  or  to  ASCII  or  CBIVI  printer. 

tvlanual  and  two  programs.  Tape;  $45.  Disk:  $50. 

TM 

TEXTCAST  II  8K  machine  language  word  processor.  Easy 
typing  and  screen  editing.  Produces  ASCII  files  on  tapes  or 
disks.  Prints  with  ASCII  or  CBIVI  printer.  Centers,  underlines, 
right  justifies,  numbers  pages.  Creates  data  files  for 
PRO-GRESS. 

Old/New  HOfvl  versions  of  program,  revised  manual.  Tape: 
$75.  Disk:  $80, 
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Cognitive  Products 
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A  Floating 
Point 

IViultiplication 
Routine 

Marvin  L  De  Jong 

Department  of  Mathennatics-Physics 

The  School  of  the  Ozarks 

Pf,  Lookout  MO  65726 

Introduction 

In  two  previous  articles  in  COMPUTE!  we  have 
described: 

1)  A  routine  that  inputs  any  signed  number 
with  magnitude  between  1.70141 183*E38 
to  1.46936795*E-39  and  converts  it  to  a 
floating-point  binary  number. 

2)  A  routine  that  outputs  a  signed  floating- 
point binary  number  to  an  output  device  in 

BCD  code. 
In  this  article  we  add  a  floating-point  multiplication 
routine  to  this  set  of  routines  that  will  eventually 
become  a  four-function  floating-point  package 
with  nine  digit  accuracy. 

The  Floating-Point  Multlpllcertlon  Routine 

A  floating-point  multiplication  routine  is  given  in 
Listing  I,  and  its  flowchart  is  shown  in  Figure  1. 
The  flowchart  is  essentially  the  same  as  that  of  B. 
Hashizume  (BYTE,  V2,  Number  1 1,  November 
1977,  p76).  Studying  the  flowchart  and  the  program 
comments  should  make  the  process  understanda- 
ble. 

The  multiplication  routine  uses  three  accumu- 
lators. Accumulator  A  occupies  locations  $0000 
through  $0003  with  the  most-significant  byte  in 
location  $0000.  Since  the  mantissa  is  normalized, 
there  will  always  be  a  one  in  Bit  7  of  location 
$0000,  unless  the  mandssa  is  identical  to  zero. 
Locadon  $0004  is  used  as  a  "guard"  byte  to  do  a 
40-bit  mukiplication.  The  40-bit  result  is  rounded 
to  32  bits,  giving  approximately  nine-digit  decimal 
accuracy.  Accumulator  B  occupies  locations  $0020 
through  $0023,  with  a  guard  byte  in  location 
$0024,  an  exponent  (twos  complement  code)  in 
location  $0025,  and  a  sign  ($FF  for  minus,  $00  for 
plus)  in  location  $0027.  The  roudne  multiplies  the 
contents  of  accumulator  A  with  the  contents  of 
accumulator  B.  Intermediate  results  are  stored  in 
RES  from  $0010  to  $0014. 

The  accumulator  architecture  just  described 
proved  to  be  very  convenient  for  the  multiplication 


routine.  However,  it  differs  slightly  from  the 
accumulator  architecture  used  in  the  routines 
described  in  previous  articles  of  this  series.  Rather 
than  modify  those  two  routines,  which  would  not 
be  difficult  if  you  wish  to  try,  we  have  included  a 
little  subroutine  in  Listing  2  that  adjust.s  the  accinn- 
ulator  used  by  the  input  routine  to  conform  to  the 
accumulator  used  in  the  multiply  routine.  Thus, 
after  the  BCD  to  Floating-Point  Binary  routine  is 
called,  the  subroutine  in  Listing  2  must  be  called. 

Once  the  accumulator  is  properly  adjusted,  it 
is  moved  to  Accumulator  B  to  await  mukiplication. 
The  BCD  to  Floating-Point  Binary  routine  is  then 
called  again  to  get  the  second  number.  Its  accumu- 
lator is  again  adjusted  to  make  it  Accumulator  A. 
Then  the  multiply  routine  is  called,  and  finally  the 
Floating-Point  Binary  to  BCD  routine  is  called  to 
output  the  answer.  This  entire  process  is  accomp- 
lished by  the  program  in  Listing  5,  and  this  program 
can  be  used  to  test  all  three  programs  for  proper 
operation. 

One  very  important  note.  The  BCD  to  Floating- 
Point  Binary  routine  must  be  modified  with  the 
instruction  listed  in  Listing  4  in  order  for  it  to  work 
with  the  multiplication  routine.  The  change  is 
simple.  Modify  the  byte  at  $0E02  from  $20  to  $  1 F. 
This  prevents  Accumulator  B's  most  significant 
byte  from  being  cleared  whenever  the  BCD  to 
Floating-Point  Binary  routine  is  called. 

And  a  final  note.  If  the  combination  of  expo- 
nents to  form  the  exponent  of  the  result  produces 
an  overflow  (exponent  larger  than  127  or  exponent 
smaller  than -128),  the  multiplication  routine 
executes  a  BRK  instrucdon.  Normally  this  will 
send  control  back  to  the  monitor,  but  one  could 
write  an  interrupt  routine  to  signal  an  overflow  or 
an  underflow. 
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machine  speed! 

CALCis  a  program  development  tool  for  Asscmblv  Language  programmers  that  takes  advantage  of  the  BASIC  ROM  routines 
alreadv  in  the  Commodore  &  APPLE  II  machines.  With  CALC,  you  program  in  a.'^.semblcr  a.s  before,  only  with  an  additional  set  of 
simple  commands  retjuiring  no  knowledge  of  the  internal  workings  of  BASIC,  floating  point  bit  format,  etc.,  which  allow  you  to 
perform  any  arithmetical  operation  that  BASIC  can  perform.  Furthermore,  CALC  provide.';  easy  access  to  the  contents  and  addresses 
of  variablcsdefincd  bv  a  BASIC  program.  Thus  it  becomes  simple  to  perform  certain  highly  time  consuming  (in  B.^SIC)  tasks 
in  Assemblv  Language,  called  as  a  subroutine  (via  a  SYS/CALL  command)  from  B.'\S1C. 

In  essence,  CALC  provides  acce.ss  to  the  power  in  the  BASIC  ROMs  without  the  overhead  of  the  BASIC  interpreter. 
CALC  does  all  the  "uglv"  stuff,  leaving  vou  to  program  the  task  at  hand. 

CALC  is  for  the  professional  AL  programmer  who  wants  to  speed  up  a  BASIC  program  without  re-writing  the  entire  thing 
in  assembler.  C.ALC  pro\ides  beginning  AL  programmers  with  acces.s  to  the  very  heart  of  the  arithmetic/floating  point  operations 
using  a  series  of  simple  commands  like  ADD,  MULT,  SQR,  SINE,  RANDOM,  etc.  CALC  includes  complete  documentation. 

The  CALC  development  ROM  produces  pure  ROMable  code  that  does  not  require  the  M.ATRIX  CALC  rom  to  run.  The 
code  vou  produce  with  the  help  of  C.'\LC  will  run  on  any  stock  machine. 

CALC  is  available  in  EPROM  fo  the  j.o  &  4..0  BASIC  dommodore  computers  at  sockets  $9000,  SAooo  and  SBooo.  CALC  EPROM 
is  $100  postpaid.  Please  order  CALC  for  the  MAH/MOSKR  or  the  Commodore  a.sscmblers. 

CALC  on  the  APPLE  II  via  a  quality  EPROM  board  at  Si  fo  postpaid.  Available  MAt/MOSER  assembly  only.  Masterchargo 
&  VISA  accepted.  ^^^^         ^K  H  ^^^^ 

CALC 

by  MATRIX  software,  inc. 

315  Marion  Ave.,  Big  Rapids,  MI  49307  (616)796-2483  or  796-0381 
.A  Complete  Line  of  Business  Software 


The  International  Microcomputer  Software 

Directory 

At  last!  Your  Software  needs  answered  by  One  single  comprehensive  source. 
Essential  for  everyone  concerned  with  microcomputers 

Comprehensive.  Every  effort  tias  been  made  to  obtain  full  details  from 
every  reliable  supplier  of  micrccomputer  software. 
Inlernalional.  With  offices  in  Britain,  America,  and  Hong  Kong,  we 
are  well  placed  to  keep  in  touch  with  developments  In  these  major 
centres.  We  also  employ  a  team  of  translators  to  obtain  up-to-date 
information  from  software  centres  throughout  the  world. 
Independent.  The  publishers  liave  no  atflllation  with  any  of  the 
software  houses  whose  programs  are  listed  in  the  directory. 
Easily-accessed.  The  clear  cross-referencing  system  outlined  above 
enables  the  reader  to  select  programs  by  specific  applications, 
operating  systems,  and  price. 

Up-to-date.  Information  is  stored  immediately  it  becomes  available  in 
a  large  computer  database  which  generates  fully  indexed  and  cross- 
referenced  camera  ready  copy.  Thus  we  are  able  to  include  software 
made  available  immediately  prior  to  publication, 
S29.95  plus  p.and  p  $2.95. 


The  DirBClory.  The  International  IVIicrocomputer  Software  Directory 
has  three  sections; 

1  Lists  software  according  lo  specific  subjects  organized  within 
seven  major  categories.  Commerce,  Education,  Home,  Industry, 
Professions,  Sciences,  Systems.  Within  the  categories  programs  are 
listed  with:  •  Name  •  A  unique  ISPN  (international  standard  program 
number)  •  A  short  description  •  Systems  with  which  it  is  compatible 
(machine  and  operating  system  •  Software  house  •  Price. 

2  Lists  in  ISPN  order  (thus  in  Software  House  order)  the  programs 
with  a  full  description  of:  •  Features  •  Special  requirements  •Method 
of  distribution, 

3  Lists  by  machine  (make  and  model),  then  within  genera!  categories 
and  subjects  the  names  and  ISPNs  of  compatible  programs. 
Appenoices  include  details  of  compatibility  between  machines  and 
operating  systems,  plus  a  glossary  of  computer  terms.  Also  included 
is  a  special  consumers'  guide  to  buying  software. 

Also  Available:  System-specific  Directories.  Organized  as  in  the  first  two  sections  described  above  and  available  for 
CP/fi/l,  Apple.  andTRS-80.  $14,95  plus  $1.95  p,  &  p.  Furttisr  details  available  upon  request. 

Yes,  Please  send  me copies  of  Itie  International  (Ulicrocomputer  Software  Directory,  and/or copies  of  Software  Directory  Supplemenls. 

L.  crieck/l^oney  Order        n  Ivlaster  Charge        Lj  Visa         L.'  Am.  Express  Acct,  No.  Expiration  Dale 


Name  (Block  letters) 
Address  


Signature, 


City/Slale/Zip/ Postal  Code  

Or  plione  your  order  through  now  [2A  hr,  service)  giving  credit  card  number,  and  address 
(Vloney  Back  if  you  do  not  agree  this  is  the  best  micro-sollware  directory  available. 


Imprint  Software 

420  South  Howes  SI. 
Fort  Collins.  CO  80521 
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Listing  1.  The  Floating-Point  Multiplication  Routine. 

$0000  =  ACCA 

Most- significant  byte  of  accumulator  A. 

$0005  =  ACCX 

Exponent  for  accumulator  A. 

$0007  =  ACCS; 

Sign  byte 

for  accumulator  A. 

$0020  =  ACCB; 

Most-significant  byte  of  accumulator  B. 

$0025  =  BCCX; 

Exponent  for  accumulator  B. 

$0027  =  BCCS; 

Sign  byte 

for  accumulator  B. 

$0010  =  RES;  Most-significant  byte  of  "result"  accumulator. 

$0014  =  GRDR 

;  "Guard" 

byte  for ' 

'result"  accumulator. 

$0C28  A5  07 

START 

LDA 

ACCS 

Determine  the  sign  of  the  result. 

0C2A  45    27 

EOR 

BCCS 

Positive  sign  if  signs  are  alike. 

0C2C  85    07 

STA 

ACCS 

negative  otherwise. 

0C2E  18 

CLC 

To  multiply,  add  exponents. 

0C2F  A5  05 

LDA 

ACCX 

0C31   65    25 

ADC 

BCCX 

0C33  50    01 

BVC 

ARND 

Break  to  monitor  if  an  exponent 

0C35  00 

BRK 

overflow  (or  underflow)  results. 

0C36  85    05 

ARND 

STA 

ACCX 

Store  result  into  EXPONENT. 

0C38  A2  04 

LDX 

#$04 

Clear  the  locations  that  store 

0C3A  A9  00 

LDA 

#$00 

the  result  for  the  mantissa. 

0C3C  05    10 

HERE 

STA 

RES.X 

0C3E  CA 

DEX 

0C3F  10    FB 

BPL 

HERE 

0C41   AO  28 

LDY 

#$28 

Do  a  40  ($28)  bit  multiplication 

0C43   A2  FB 

BR2 

LDX 

#$FB 

starting  here. 

0C45   18 

CLC 

0C46  76    25 

BACK 

ROR  ACCB-I-5,X 

Rotate  Multiplier  right  into  carry. 

0C48  E8 

INX 

0C49  DO  FB 

BND 

BACK 

0C4B  90    OC 

BCC 

PAST 

No  carry;  don't  add. 

0C4D  A2  04 

LDX 

#04 

Add  Multiplicand  to  Result. 

0C4F  18 

CLC 

0C50  B5   00 

MORE 

LDA 

ACCA,X 

0C52  75    10 

ADC 

RES,X 

0C54  95    10 

STA 

RES,X 

0C56  CA 

DEX 

0C57    10    F7 

BPL 

MORE 

0C59  A2  FB 

PAST 

LDX 

#$FB 

Shift  Result  right  one  bit. 

0C5B  76    15 

BRl 

ROR  RES-I-5,X 

0C5D  E8 

INX 

0C5E  DO  FB 

BNE 

BRl 

0C60  88 

DEY 

Back  for  another  bit  in  the 

0C61  DO  EO 

BNE 

BR2 

multiplier? 

0C63  A5  10 

BR4 

LDA 

RES 

Check  for  zero  result. 

0C65  FO   3F 

BEQ 

OUT 

If  so,  get  out. 

0C67  30    14 

BMI 

DETOUR 

Check  if  mantissa  is  already 

0C69  A2  04 

LDX 

#04 

normalized. 

0C6B  18 

CLC 

0C6C  A5  05 

LDA 

ACCX 

For  each  shift  left,  decrement 

0C6E  E9   00 

SBC 

#00 

exponent. 

0C70  50    01 

BVC 

BR8 

Overflow  set? 

0C72  00 

BRK 

Yes,  go  to  monitor. 

0C73  85    05 

BR8 

STA 

ACCX 

0C75   18 

CLC 

0C76  36    10 

BR3 

ROL 

RES,X 

0C78  CA 

DEX 

0C79    10    FB 

BPL 

BR3 

0C7B  30    E6 

BMI 

BR4 

0C7D  A5  14 

DETOUR     LDA 

GRDR 

If  most-significant  bit  of  guard 
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0C7F  10 
0C81  38 
0C82  A2 
0C84  B5 
0C86  69 
0C88  95 
0C9A  CA 
0C9B  10 
0C8D  90 
0C8F  A9 
0C91  85 
0C93  38 
0C94  A5 
0C96  69 
0C98  50 
0C9A  00 
0C9B  85 
0C9D  A2 
0C9F  B5 
OCAl  95 
OCAS  CA 
0CA4  10 
0CA6  60 


IC 

03 

10       BR6 

00 

10 

F7 

OE 
80 
10 

05 
00 

01 

05  BR9 

03  BR5 

10  BR7 
01 


F9 


OUT 


BPL 

SEC 

LDX 

LDA 

ADC 

STA 

DEX 

BPL 

BCC 

LDA 

STA 

SEC 

LDA 

ADC 

BVC 

BRK 

STA 

LDX 

LDA 

STA 

DEX 

BPL 

RTS 


BR5 

#03 
RES,X 
#00 
RES,X 

BR6 
BR5 
#$80 
RES 

ACCX 

#00 
BR9 

ACCX 

#03 

RES,X 

ACCA+1,X 

BR7 


byte  is  one,  then  round  up. 


Did  rouding  produce  a  carry  from 
the  mantissa? 
Yes.  Fix  mantissa. 
And  adjust  exponent. 


Check  for  overflow. 

Jump  to  monitor  on  overflow. 

Move  result  to  accumulator  for 
the  output  (Binary  to  BCD)  routine. 


Get  out. 


Listing  2.  A  Subroutine  to  Modify  the  Accumulator  of  the  BCD-to-Binary  Routine. 


$0FB0 
OrB2 
0FB4 
0FB5 
0FB7 
0FB8 
OFBA  88 
OFBB  DO 
OFBD  60 


AO 

A2 

18 

36 

CA 

10 


08 
04 


SUBl 
B2 


00       Bl 


FB 


F5 


LDY 
LDX 
CLC 
ROL 
DEX 
BPL 
DEY 
BNE 
RTS 


#08 
#04 

ACCA,X 

Bl 
B2 


Rotate  the  accumulator  one  byte 
(eight  bits)  left. 


Listing  3.  A  Subroutine  to  Transfer  Accumulator  A  to  Accumulator  B. 


$OFCO 
0FC2 
0FC4 
0FC6 
0FC7 
0FC9 


A2 

B5 

95 

CA 

10 

60 


07 
00 
20 

F9 


SUB2 
B3 


LDX 
LDA 
STA 
DEX 
BPL 
RTS 


#07 

ACCA,X 

ACCB,X 

B3 


Move  ACCA  to  ACCB. 


Listing  4.  An  IMPORTANT  Modification  to  the  BCD-to-Binary  Routine. 


$0E01    A2   IF      MODIFY      LDX  #$1F 


The  multiply  routine  will  not  work 
without  this  modincation. 


Listing  5.  An  Input/Output/Multiply  Calling  Program. 


0050 

20 

00 

OE 

JSR 

INPUT 

0053 

20 

BO 

OF 

JSR 

SUBl 

0056 

20 

CO 

OF 

JSR 

SUB2 

0059 

20 

00 

OE 

JSR 

INPUT 

005C 

20 

BO 

OF 

JSR 

SUBl 

005F 

20 

28 

OC 

JSR 

MULTIPLY 

0062 

20 

00 

OB 

JSR 

OUTPUT 

0065 

00 

BRK 

Call  the  BCD  to  Floating-Point  Binary  Routine. 

Call  the  subroutine  to  modify  the  accumulator. 

Transfer  ACCA  to  ACCB  (it  takes  two  to  multiply), 

and  get  the  second  number. 

Fix  the  accumulator  again. 

Multiply  the  two  numbers  using 

Listing  1  in  this  article.  Then 

output  the  result  using  the  Floating-Point 

Binary  to  BCD  Routine. 
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START 


EOR  SIGNS  TO 
GET  SIGN  OF 
RESULT 


ADD  SIGNED 
EXPONENTS 


CLEAR  RESULT 
AND  SET  BIT 
COUNT  TO  40 


A 


-> 


ROTATE 
MULTIPLIER 
RIGHT  1  BIT 


YES 


ADD 

MULTIPLICAND 
TO  RESULT 


N/ 


SHIFT  RESULT 
RIGHT  1  BIT 


DECREMENT 
THE  BIT  COUNT 


Figure  1. 

Flowchart  of  the  Floating-Point 
Routine. 


ROUND  RESULT 
UPWARD 


Selectric®  Interface  System 


E 

s 


ASILY  intcrtaccd  to  any  IBM  Sclcctnc  I, 
U,  or  III. 


•  TOP  spinning  your  wheels.  Letter  qual- 
ity at  an  affordable  price. 

LONNECTS  via  I'arallel  or  RS-232,  ac- 

eonimodates  varied  handshaking. 


o 

N 


NLY  S575  to  S599.  Dealer  inquiries  in- 
vited. 

EW  design  provides  added  features. 


s^i 


ESCON  Products,  Inc. 

12919  Alcosla  Blvd. 

San  Ramon,  Ca.,  94583 

(415)  820-1256 


^m§  I  ^11 


The  Most  Powerful  Disk-Based 
Macro  Assembler/Text  Editor 
Available  at  ANY  Price 


Now  includes  the  Simplified  Text  Processor  (STP) 

For  32  K  PET,  disk  48K  APPLE  II 

3.0  or  4.0  ROMS  or     —  OR  —       or  APPLE  II   + 
8032    (specify)  and  DISK  II 

MAE  FEATURES 

—  Control  Files  for  Assembling  Multiple  named  source  files 
from  disk 

—  Sorted  Symbol  table  —  Up  to  31  chars./iabel 

—  27  Commands,  26  Pseudo-ops,  39  Error  Codes 

—  Macros,  Conditional  Assembly,  and  a  new  feature  we  developed 
called  Interactive  Assembly 

—  Relocatable  Object  Code 

—  String  search  and  replace,  move,  copy,  automatic  line 
numbering,  etc. 

STP  FEATURES 

■ —     17  text  processing  macros 

—  Right  and  left  justification 

—  Variable  page  lengths  and  widths 

—  Document  size  limited  only  by  disk  capacity 

—  Software  lower  case  provision  lor  APPLE  II  without  tower 
case  modification 

ALSO  INCLUDED 

—  Relocating  Loader 

—  Sweet  15  macro  library  for  APPLE  and  PET 

—  Machine  Language  macro  library 

—  Sample  files  for  Assembly  and  text  processing 

—  Separate  manuals  for  both  APPLE  and  PET 
PRICE 

—  MAE.  STP.  Relocating  Loader,  Library  files,  SO  page  manual 
diskette  —  $169.95 

SEND  FOR   FREE  DETAILED  SPEC  SHEET 

EASTERN   HOUSE  SOFTWARE 

3239   LINDA  DRIVE 
WINSTON-SALEM,  N.  C.  27106 


(919)    924-2889 


(919)     748-84<l6 
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Professional  Business  Software 

For  The  Commodore  32K  Microcomputer  System 
With  2040  Dual  Drive  Disk  &  2022  Tractor  Feed  Printer 


General  Ledger 


Accounts  Payable 


Accounts  Receivable 


Payroll 


Holds  Up  To  300  Accounts 

Accepts  Up  To  3000 
Transactions  Per  Month 

Cash  Disbursements  Journal, 
Cash  Receipts  Journal,  and 
Petty  Cast!  Journal  for 
simplified  data  entry. 

Maintains  Account  Balances 
For  Present  Month,  Present 
Quarter,  Present  Year.  Three 
Previous  Quarters,  And 
Previous  Year 

Complete  Financial  Reports 
Including  Trial  Balance, 
Balance  Sheet.  Profii  &  Loss 
Statement,  Casti  Receipts 
Journal.  Cash  Disbursements 
Journal,  Petty  Cash  Journal 
and  more 

Accepts  Postings  From 
External  Sources  Such  As 
Accounts  Payable,  Accounts 
Receivable,  Payroll, 
Etc    


•  Interactive  Data  Entry  Wi!h 
Verified  Input  And  Complete 
Operator  Prompting 

•  Automatic  Application  Of 
Credit  And  [Debit  Memos 

•  Maintains  Complete  Purchase 
Records  For  Up  To  200 
Vendors 

•  Invoice  File  Accepts  Up  To 
400  Invoices 

•  Random  Access  File 
Organization  Allows  Fast 
Individual  Record  Updating 

•  Multiple  Reports  Provide  A 
Complete  Audit  Trail, 

•  Check  Printing  With  Full 
Invoice  Detail 

•  Full  Invoice  Aging 

•  Automatic  Posting  To 
General  Ledger  ,    . 


•  Maintains  Invoice  File  For  Up 
To  300  Invoices. 

•  Accomodates  Full  Or  Partial 
Invoice  Payments 

•  Customer  File  Maintains 
Purchase  Information  Fof  Up 
To  1000  Customers. 

•  Allows  For  Automatic 
Progress  Billing 

•  Provides  For  Credit  And  Debit 
Memos  As  Well  As  Invoices. 

•  Prints  Individualized 
Customer  Statements. 

•  Interactive  Data  Entry  With 
FullOperator  Prompting 

•  Complete  Data  Input 
Verification  And  Formating 

•  Aulomatic  Posting  To 
General  Ledger  .... 


•  Maintains  Monthly,  Quarterly, 
And  Yearly  Cumulative  Totals 
For  Each  Employee. 

•  Payroll  Chect<  Printing  With 
Full  Deduction  And  Pay  Detail. 

•  Sixteen  Different  Reports 
Including  W2  And  941. 

•  Interactive  Data  Entry  With 
Easy  Correction  Of  Entry 
Errors 

•  Automatic  Data  Verification. 

•  Complete  Job  Costing  Option 
With  Cumulative  Totals  And 
Overhiead  Calcutations. 

•  Random  Access  File 
Organization  For  Fast 
Updating  Of  Individual 
Records. 

•  Automatic  Posting  To 
General  Ledger  . . . 


Structured  around  the  lime  tested  and  reliability  proven 
series  of  business  software  systems  developed  by  Osborne 
and  Associates,  these  programs  have  been  designed  to  (ill 
the  need  of  a  comprehensive  accounting  package  for  the 
new  Commodore  PET  micro  computer  system  Each  program 
can  eithier  stand  alone,  or  be  integrated  with  the  others  in  a 
total  software  system 

Designed  with  the  first  time  user  in  mind,  these  programs 
lead  the  operator  through  step  by  step,  verified  data  entry  It 
IS  impossible  to  'crash'  a  program  due  lo  operator  error  or 
invalid  data  input  Design  consistency  has  been  maintained 
from  program  to  program  to  greatly  increase  operator 
familiarity  and  confidence. 

Documentation,  normally  a  problem  for  small  systems 
users.  IS  provided  by  the  comprehensive  series  ol  Osborne 


and  Associates  user  manuals.  These  three  manuals  together 
total  over  800  pages  of  detailed  step  by  step  instructions 
written  at  three  levels  lor  DP  Department  Managers.  Data 
Entry  Operators,  and  Programmers  You  don't  have  to  worry 
about  getting  'promises'  instead  of  documentation  because 
the  documentation  was  written  before  the  programs 
were  developed  A  second  set  ol  manuals  details  any 
changes  required  during  conversion  Each  program 
provided  on  disk  with  complete  documentation  Packaged 
in  a  handsome  three  ring  binder  with  pockets  and  twelve 
monltily  dividers  for  convemeni  storage  of  reports 

See  your  nearest  Commodore  dealer  lor  a  demonstra- 
tion of  this  outstarjding  business  software  system. 


CMS  Software  Systems 


5115MENEFEEDRIVE 


DALLAS  TX  752?/ 


?14  361  0690 
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Naming 
Compounds 

Tony  A  Hortman 
Texarkana,  AR 

Chemistry  students  seem  to  have  less  trouble  're- 
membering' names  of  elements  and  radicals  when 
seated  in  front  of  a  computer.  The  prefixes,  suffixes 
and  symbols  used  in  nomenclature  seem  less  con- 
fusing. Students  seem  to  be  able  to  calculate  sub- 
scripts faster  when  challenged  by  the  'answer  ma- 
chine'. Students  begin  to  rely  less  on  lists  of  valences 
and  sometimes  need  not  even  consult  a  periodic 
chart  for  the  proper  valences. 

Try  this  program  after  you  have  'hammered 
away'  at  valences  and  'harped  on'  using  the  correct 
suffix  in  naming.  In  this  program,  answers  are 
typed  in  exactly  as  they  would  be  written  on  paper, 
except  for  the  placement  of  subscripts  on  the  screen 
(on  the  screen,  SUBSCRIPTS  are  on  the  same  Hne 
as  the  symbol).  I  think  the  program  can  best  be  util- 
ized after  practice  and  drill  on  naming  compounds 
and  writing  formulas.  I  have  found  that  students 
working  in  pairs,  carefully  selected,  have  shown  the 
best  response.  The  tendency  to  'let  the  machine  an- 
swer the  hard  ones'  is  lessened  when  working  in 
pairs. 

The  following  program  was  written  on  a  PET 
computer  for  use  in  high  school  chemistry  classes. 
As  written,  the  program  uses  about  6K  of  memory. 
It  will  run  as  is  on  any  model  PET  -  original,  up- 
grade, or  4.0  ROM.  There  are  many  statements 
which  could  be  omitted  or  combined  if  you  are  in- 
terested in  making  it  more  compact. 

The  elements  and  radicals  used  in  the  com- 
pounds are  some  of  the  more  commonly  encoun- 
tered ones.  Students  should  be  familiar  with  most  of 
the  symbols  and  valences.  The  names  of  elements 
and  radicals  used  in  the  program  can  be  changed 
easily  as  you  will  see  later. 

Well,  enough  of  that.  I  am  sure  you  will  find  an 
effective  and  practical  way  to  use  the  program.  Here 
is  a  summary  of  the  program  by  line  numbers: 

30-130       Prints  title,  gives  choice  of  writing  names  or 

formulas 
140-170      Randomly  chooses  a  name  (called  from  line  880 

&990) 
180-200      Delay  a  few  seconds  (used  in  the  instructions) 
210-250      Prints  message  and  waits  for  space  bar  (called 

throughout) 
260-310      Reads  data  statements 
320-450      Compares  valences  and  assigns  subscripts 
460-510       Displays  'correct'  on  the  screen  and  increments 

correct  answer  counter 
520-730       Instructions  for  writing  formulas 
740-860      Prints  compound  name  on  screen  and  asks  for 

formula 


870-990 


1000-1280 
1290-1430 


1440- 
1510- 
1590- 
1660- 
1770- 
1940- 


1500 
1580 
1650 
1760 
1930 
2060 


Setsnumbcrofelements,  calls  subroutine  to 

choose  name  and  assign  subscripts,  sets  the 

correct  formula 

Instructions  for  writing  names  of  compounds 

Uses  subroutine  870  to  randomly  choose  a 

compound 

Prints  student  average  and  comment 

Additional  instructions 

Comments  on  scores 

Additional  instructions 

Data  statements  containing  metal  groups 

Data  statements  containing  nonmetal  groups 


The  following  is  a  summary  of  the  variables  used. 
Hopefully,  this  will  help  you  to  interpret  and  adapt 
the  program  a  little  easier  if  that  is  what  you  want  to 
do. 

c  number  of  correct  answers 

e$  name  of  element 

s$  symbol  of  element 

\%  valence  of  element 

el$  namcof  metal  group 

sl%  sytnbol  of  metal  group 

vl%  valence  of  metal  group 

e2$  name  of  nonmetal  group 

s2$  symbol  of  nonmetal  group 

v2%  valence  of  nonmetal  group 

n  numbcrofmctal/nonmetal  ions  listed  in  data  statements 

f$  forniuUi  of  compound  given  by  student  input 

f  1$  correct  formula  of  compound  calculated  by  PET 

n$  name  of  compound  given  by  student  input 

nl$  correct  name  of  compound 

1$  line  of  graphic  symbols  printed  on  screen 

sl%  subscript  of  metal  group 

so%  student  score  as  a  percent 

t  try  (student  gets  two  tries  to  answer  correctly) 

X  random  number 

z%  number  read  to  keep  data  statement  pointer  at  the  right 

spot 

z$  strings  read  to  keep  data  statement  pointer  at  the  i"ight 

spot 

What  about  personalizing  the  program?  The 
statements  which  print  the  diiections  can  be 
changed  to  'your  language'.  You  can  change  or  take 
out  the  delay  loop.  Change  the  data  statements  to  in- 
clude more  or  different  elements  or  radicals.  If  you 
change  the  number  of  elements,  be  sure  to  change 
the  value  of  the  variable  n  in  line  880  to  correspond 
to  the  number  of  metal  groups  and  the  value  of  n  in 
line  990  to  correspond  to  the  number  of  nonmetal 
groups.  Also,  changing  the  comments  to  your  own 
witty  remarks  will  spark  some  interest. 

One  final  note.  I  was  reluctant  to  send  an  article 
to  a  nationally  known  magazine.  I  felt  less  compe- 
tent than  .some  because  of  a  lack  of  formal  computer 
training.  But  I  am  convinced  that  for  educators  to 
share  theii"  ideas  on  computers,  piograms  and  the 
use  of  these,  we  must  all  put  aside  our  feelings  of  in- 
adequacy and  start  sharing  what  we  have.  I  look  for- 
ward to  seeing  more  science  programs  (or  any  pro- 
grams for  that  matter)  from  you  educators  who  have 
been  holding  back! 

Editor's  Note:  Me  too!  RCL 
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MICROMATH 

revolutionizes  the 
teaching  of  math! 

Grades  6  to  12 

MicroMalh  Is  a  complete  review 
mathematics  course  vutiicfi  will  he  o(  great 
value  to  students  from  grade  6  through  12. 

93  Lessons,  16  Tests,  150  Page  Workbook 

students  can  choose  from  93  separate 
lessons  (each  with  pre-tesl  and  lesson)  anrj 
work  comfoftably  at  their  own  speed,  with 
peers  or  individually.  Each  unit  has  its  own 
post  tesi  and  the  entire  package  is  sup- 
plemented with  a  150  page  workbook. 

RunsonCOMMODORE  PET16Kand  APPLE  11  + 

PET  version  consists  of  5  disks,  the  APPLE 
version  has  10  disks. 

Presently  in  use  across  Canada  and  the  U.S. 

MicroMath  is  the  only  full,  one-semester 
course  of  its  kind  in  t^orth  America  and  is 
highly  praised  by  Ihose  inslruclors  using  it. 

S500.00  for  complete  package  (U.S.  funds) 

A  demonsiration  disk,  consisting  ol  8  sam- 
ple lessons  and  2  tests,  is  available  lor  only 
$25.00 

For  more  information 

Wrile     Mr.  F.  W inlet. 

SHERIDAN  COLLEGE 
1130  Jralatgar   Road, 
Oakville.   Or^lano. 
Canada  L6H  2L1 


Computer  House  Division 

PROGRAMS  FOR  COMMODORE  AND  APPLE 

Legal  accounting  Demo  $15.00 

Legal  accounting  Program  995,00 

Machine  Part  Quote  Demo  15.00 

Machine  Part  Quote  Program  325.00 

Mailing/phone  list  80.00 

Political  Mall/phone  list  130.00 

Beams,  structural  115.00 

Trig/Circle  Tangent  110.00 

Spur  Gears  35.00 

Bolt  Circles  25.00 

Filament  Wound  TAnks  125.00 

Scrunch  25.00 


PROGRAMS  FOR  COMMODORE  ONLY 

A/P,A/R,  Job  Costa  Job  Est.  370.00 

Inventory  95,00 

Financial  175.00 

Real  Estate  Listings  265.00 

Check  Writer  25.00 

File  Editing  Tools  (FET)  65.00 

Screen  DumpyRepeat  35.00 

Docu-Print  20.00 

Scrunch  ■                    25.00 

Sof-Bkup  40.00 

Sorter  (Mach.  Language)  35.00 

Trace-Print  25.00 

Vari-Print 25.00 

ASK  FOR  CATALOG  #80-C2  Dealers  Wanted 
Computer  House  Div.  1407  Clinton  Road 
Jackson,  Michigan 


NEW         Pro. 

nenaissance 

^TPechnology 

Eorporation 


LETTER  QUALITY 
Printer/Typewriter 


$1495.00^ 


The  Olympia  ESlOO  typewriter  connecteid  to  Apple.  Atari. 
NEC  orTRS-80  with  the  Ren  Tec  RS-232  interface  provides 
for  the  first  time  a  truly  cost-e1fective.  letter-quality  printer 
that  also  functions  as  a  typewriter,  interactively. 
■Commodore  IEEE  slightly  higher 


OLYMPIA  ES100 

REN  TEC  ES 

•  92  character  electronic 

•  Installation  in  15  minutes 

keyboard 

using  existing  ES100 

•  e  character  buffer  memory 

cables 

•  Dual  pitcti.  10  and  12 

•  CIvlOS  logic  for  minimal 

•  17.5  C-PS. 

drain  on  ES100  power 

•  All  settings  from  keyboard 

supply 

•  Auto,  correction 

•  Accepts  RS232  serial: 

•  Daisy  type  print  mechanism 

•  7  crystal  controlled  baud- 

•  1400  dealers  nationwide 

rates 

•  Cartridge  ribbons 

•  Accomodates  odd.  even. 

•  14;i  inches  writing  line 

or  absent  parity 

•  Accepts  parallel  8-bit 

interface 

•  Will  accept  hi  or  low  true 

control  bits 

•  Features  answer-back 

hand-shake  logic 

•  Provides  any  ctiaracter 

translation  format 

OTHER  REN  TEC  PRODUCTS 

Diablo  1640/165010  IEEE 

Watanabe  Plotter  to  IEEE 

Centronics  Parallel  to  RS-232c 

Universal  Parallel  Device  to  IEEE 

Setni-Conductor;  3  channel  music  &  sound  effects 

Custom  Cables  and  Interfaces  Available 


Dealer  Inquiries  Welcomed 

3347  VINCENT  RD, 

PLEASANT  HILL,  CA  94523 

415-930-7707 


49202       (517)  782-2132 
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VRRIflBLE 

REFERENCES 

C: 

430 

500 

530 

1450 

et 

280 

760 

898 

1319 

el* 

760 

390 

1310 

■f$ 

738 

7yy 

S00 

fit- 

380 

330 

950 

968 

970 

980 

1330 

i 

40 

50 

60 

70 

190 

270 

300 

460 

1* 

2y 

530 

610 

630 

710 

738 

778 

yk:0 

840 

1010 

1$ 

1090 

1100 

1180 

1190 

1270 

1320 

1340 

1390 

1410 

1460 

1* 

1470 

1490 

1510 

1570 

1670 

1750 

r"i 

150 

lee 

290 

300 

SS0 

900 

n* 

1350 

1368 

1370 

rd$ 

1310 

1370 

1400 

-i 

130 

720 

76B 

350 

1230 

1330 

1420 

■--if 

110 

120 

130 

230 

240 

si- 

230 

890 

940 

950 

960 

970 

930 

si 

340 

390 

430 

450 

950 

950 

S6Q 

970 

930 

sl$ 

390 

930 

950 

960 

970 

930 

s2 

340 

:-;9e 

430 

450 

940 

950 

369 

970 

980 

scJ; 

1450 

1460 

1600 

1610 

1620 

1630 

1640 

t 

490 

760 

300 

320 

S30 

1338 

1 370 

1390 

1400 

ti 

20 

'...'.■; 

280 

390 

910 

vlX 

330 

360 

370 

390 

410 

430 

450 

890 

m2,-; 

330 

360 

370 

390 

410 

430 

450 

910 

X 

20 

150 

160 

270 

290 

300 

z$ 

300 

-r'-' 

300 

LINE 
40 

110 

140 
150 
130 
130 
210 
23  0 
260 
310 
320 
350 
360 
390 
410 
430 
450 
460 
510 
520 
730 
738 
320 
348 
370 

1000 

1300 
1350 

1390 
1418 
1-440 
1510 
1590 
1 660 


REFERENCE 

1500 
110 

880 
1 60 
640 
1140 
610 
230 
830 
290 
920 
408 


120 

900 

650 
1150 
710 
240 
960 


660 

LI  60 

340 


670   630   690   700   1116   1120   1130 
1090   1180   1270   1410   1500   1530   1750 


330 

370 

360 

418 

338 

818 

490 

130 

358 

7yu 

308 

8 1 0 

750 

138 

1420 

1 360 

1370 

1 380 

868 

720 

1 4S0 

bk'0 


44fj   450 


420 
1330 


10  POKE59468,14 

20  L$="(ffnf  f(f(f  f  f(ff 


-.J_LLLlil":X=RND(-Tr; 
30  REM  PRINTS  BOX  CLOCKWISE 
40  PRINT"Fi",-  :P0RI  =  lTO39:PRINT"i' 


'(l((i(l((i((((( 


::NEXT 


320 


1300 


1 390 


1430 
1280 


5  0  FORI=lT023:PRINT"^<t"; :NEXT 

60  FORI=lT039;PRINT"i«";  :NEXT 

70  FORI=lT024:PRINT"i,T<";  :NEXT 

80  PRINT"ht^^^{'i"TAB(12)  "NAHJNg  COMPOUNDS" 

90  PRINT"i^"TAB  (6)  "CHOOSE  ONE  OF  THE  -, 

-.FOLLOWING:" 
100  PRINT"ii't"TAB(12)  "1.  WRITE  FORMULAS": 

-,PRINT"H"TAB(12)  "2.  WRITE  NAMES" 
110  GETQ$:IFQ$=""THEN110 
120  IFQ$<>"1"ANDQ$<>"2"THEN110 
130  Q=VAL(Q$) :ONQGOTO520,1000 
14  0  REM  SUBRTN  TO  CHOOSE  A  NAME  0<X<18 
150  X=INT(N*RND(1)+D.5) 
160  IFX>NORX<=0THEN150 
170  RETURN 

180  REM  SUBRTN  TO  DELAY  A  FEV?  SECONDS 
190  FORI=1TO1000:NEXT 
200  RETURN 

210  REM  SUBRTN  TO  PRINT  MESSAGE  AND  VJAIT 
220  PRINT"^^PRESS  THE  rSPACEr  BAR  TO  -i 

-^CONTINUE. 
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230  GETQ$:IFQ$=""THEN230 

240  IFQ$<>CHR$(32)THEN230 

250  RETURN 

260  REM  SUBRTN  TO  READ  NAMES,  FORMULAS 

270  P0RI=1T0X 

280  READE?,S$fV%:NEXT 

290  IFX=NTHEN310 

300  F0RI=X+1T0N:READ2$,Z5,Z% :NEXT 

310  RETURN 

320  REM  SUBRTN  TO  COMPARE  VALENCE  AND  -. 

iRETURN  SUBSCRIPTS 
330  IFV1%<>V2%THEN360 
340  S1=1:S2=1 
350  RETURN 

360  IFV1%>V2%THEN410 
370  IFV2%/V1%=20RV2%/V1%=30RV2%/V1%=4THE 

-iN3  90 
380  GOTO450 
390  S1=V2%/V1%:S2=1 
400  GOTO350 
410  IFV1%/V2%=20RV1%/V2%=30RV1%/V2%=4THE 

-,N430 
420  GOTO450 
430  S2=V1%/V2%:S1=1 
440  GOTO350 

450  S1=V2%:S2=V1%:GOTO350 
460  FORI=1TO20 : IFINT ( 1/2) =I/2THENPRINT"x 

-"; 
470  PRINT"*CORRECT*r 
4  80  PRINT" TT": NEXT 
490  IFT=1THENC=C+1:GOTO510 
500  C=C+0.5 
510  RETURN 

520  REM  WRITE  FORMULAS  WHEN  GIVEN  NAME 
530  C=0:PRINT"fi^J'"L$"i" 
540  PRINT"YOU  WILL  BE  GIVEN  THE  NAME  OF  - 

-.A  COMPOUND 
550  PRINT"AND  ASKED  TO  WRITE  THE  -. 

-.FORMULA.   YOU 
560  PRINT"\^MUST  USE  A  SPECIFIC  FORM  IN  -. 

-.ANSWERING 
570  PRINT"^^THESE.   10  WRITE  THE  -. 

-.FORMULAS  ON  THE 
580  PRlNT"ii'SCREEN,  YOU  CANNOT  USE  i 

-.SUBSCRIPTS. 
590  PRINT"'i'IOU  MUST  TYPE  IN  THE  -. 

-.SUBSCRIPT  ON  THE 
600  PRINT'^SAME  LINE  AS  THE  ELEMENT  -. 

-.SYMBOL.  T^         (INSTRUCTIONS  -. 

-.CONTINUED) 
610  PRINTL$:GOSUB210 
620  GOSUB1660 
630  PRINT"fi^'"L$"^£OR  EXAMPLE,  TO  WRITE  -. 

-■THE  FORMULA  FOR 
640  PR1NT"^THE  COMPOUND  CALCIUM  -. 

-.CHLORIDE,  YOU  WOULDi^V?RITE:*" : 

-.GOSUB180:GOSUB180 
650  PRINT"£"; :GOSUB180 : PRINT"A" ; : 

-.GOSUB180:PRINT"£";  :GOSUB180: 

-,PRINT"L"  ;  :GOSUB180  :  PRINT"2"  : 

-.GOSUB180 
660  PRINT"t^F0R  the  COMPOUND  POTASSIUM  -. 

-.SULFATE :  ^  ":  GOSUBl  80 
670  PRINT"K"; :G0SUB1 80 : PRINT"2 " ; : 

-nGOSUBl80  :  PRINT "S"  ;  :  GOSUB180  : 

-.PRinT"Q";:GOSUBl80:PRINT"4": 

-,GOSUB180 
680    PRINT"i^FOR   THE    COMPOUND    ZINC    -. 

-nNITRATE:f":GOSUBl80 
690    PRINT"i"; : GOSUB180 : PRINT"N" ; : 


GAMES 


<PDI 


Tred  of  shoot-em-up  arcade  gomes? 
Stimulate  your  brain  for  a  cfionge  and  hicve  fun 
doing  it.  PDI  lias  ttne  best  of  tfie  word  puzzle 
gomes  by  Dr.  Dean  Victor  for  Atari",  Apple  II*  and 
TRS-80*. 

MINICR05SW0RD  Computer  invents  a 
crossword  puzzle  on  the  screen.  Wfien  ttie  puzzle 
is  formed,  you  fill  in  the  words.  If  you  can't  supply 
G  word,  the  computer  will  fill  it  in  (and  deduct 
points  from  your  score  I)  Thousands  of  different 
puzzles  can  be  generated. 

WORD  SEARCH  Computer  generates  word 
search  puzzles  using  either  a  Spanish,  French  ex 
geography  word  list.  Atari  version  uses  color, 
sound  and  other  special  effects,  and  will  even 
generate  printed  puzzles  for  you  to  do  when 
away  from  the  computer  This  is  an  excellent  way 
for  students  to  practice  foreign  language 
vocabulary. 

ASTRO-QUOTES  This  is  an  anagram-type 
game.  The  goal  of  the  game  is  to  guess  a  famous 
quotation.  Clues  are  letters  that  the  computer 
inserts  in  the  correct  slots  in  the  quotation  when 
the  player  correctly  guesses  the  definitions  of  a 
series  of  words. 

KROSS  "N  QUOTES  Quotation  guessing 
game  in  which  the  player  works  against  the 
clock.  Player  fills  in  the  quote  by  picking  scram- 
bled letters  and  putting  them  in  place  using  the 
joystick. 

Available  at  Computerland  and  other  fine  com- 
puter stores,  or,  directly  from  us. 


16.95- 

23,95- 

16,95- 

16.95 

Apple 

Apple  disk 

TRS-BO 

Atari 

Minicrosswoid 

24K 

48K 

16K 

2dK 

WcxdSeorch: 

16K 

32K 

16K 

16K 

Geography 

Word  Search 

16K 

32K 

16K 

16K 

Spanish 

WofdSeorch 

16K 

32K 

16K 

16K 

French 

Astfo  Quotes 

16K 

32K 

16K 

UK 

Kross  N  Quotes 

NA 

NA 

NA 

1«< 

•plus  51.50  stiipping  ond  hondltng 

*ApD.©  15  a  Iractemork  o*  Apple  Compute.  Cofp 

■tRS-80 15  o  Irodemark  a  {he  Tandy  Core     "ATAHI  (5  o  liodemork  m  A(ofi.  Inc. 


Program  Design.  Inc  Deportment  CA  11  Idar  Court  Greenwich,  CT  06830 
203  661-87W 
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710 

720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 

830 

840 
850 
860 

870 
880 
890 
900 
910 
920 
930 

940 

950 

960 

970 

980 
990 
1000 
1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 
1090 
1100 


-.GOSUB180:PRINT"(";  :GOSUB180: 

-iPRINT"E";  :GOSUB180:PRINT"Q"; 
GOSUB180:PRINT"3";:GOSUB180: 

-.PRINT")  ";  :GOSUB180:PRINT"2": 

-.GOSUB180 
PRINT"i^"L$:GOSUB210 
Q=0:GOSUB1510 
PRINT"fi>"L$ 

REM  SELECT  NAME  AND  ASK  FOR  FORMULA 
GOSUB870 

Q=Q+1:PRINTQ".  "ElS"  "E$;T=fl 
PRINT"i^"L$"i" 
INPUT"FORriULA   _-^<4";F$ 
IFF$="_"THENPRINT"TT" :GOTO780 
T=T+1: IFF$<>Fl$THEN820 
PRINT"i^"  :GOSUB460:GOTO840 

lFT=lTHENPRINT"i>ifEQMl    TRY  -. 

-■AGAIN, '':PRINT"t^"L$:GOTO780 
TFT=2THENPRINT";^WR0NG  AGAIN! 

-.FORMULA  IS  "Fl$ 
PRINT"i^"L$:GOSUB210 
IFQ<10THEN730 
GOTO1440 

REM  SUBRTN  TO  CHOOSE  NAME  AND  FORM 
N=17 :GOSUB140 :GOSUB260 
E1$=ES:S1S=S$:V1%=V% 
N=13 :GOSUB140 :GOSUB260 


1170 

1180 

1190 

1200 

1210 

1110 

1120 

1130 
1140 

1150 
1160 


RESTORE : V2%=ABS ( V% ) 

GOSUB320 

IFLEN(S1$) >2ANDS1>1THENS1$=" { "+Sl$+" 

-)" 
IF(LEN(S$)>2ANDS2>l)OR(S$="ilil"ANDS2> 

-.1)THENS$="("  +  S$+")  " 
IFS1<>1ANDS2<>1THENF1$=S1$+RIGHT$(ST 

-.R${S1)  ,1)+S$+R1GHT$(STR$(S2)  ,1) 
IFS1<>1ANDS2=1THENF1 $=S1 S+RIGHT$ ( STR 

-$(S1),1)+S$ 
IFS1=1ANDS2<>1THENF1S=S1$+S$+RIGHT$( 

-.STR$CS2)  ,1) 
IFS1=1ANDS2=1THENF1$=S1$+S$ 
RETURN 
REM  WRITE  NAMES  WHEN  GIVEN  FORMULAS 
PRINT"fii"L$"i>'XOU  WILL  BE  GIVEN  A  -. 

-.FORMULA  AND  YOU 
PRINT"i)'WILL  BE  ASKED  TO  WRITE  THE  -. 

-.NAME  OF  THE 
PRINT "i^COMPOUND.   SPELLING  -i 

-.DEFINITELY  COUNTS. 
PRINT"^^£0  YOU  WILL  NEED  TO  BE  -. 

-.CAREFUL  WITH  THE 
PRINT"^ENDINGS  SUCH  AS  'ITE'  AND  -. 

-.'ATE'  AND  ALL 
PRINT"^^OTHER  SPELLINGS  AS  WELL. 

-.TYPE  THE  NAMES 
PRINT"WITHOUT  USING  CAPITAL  -. 

-.LETTERS. 
PRINT"!^  ( INSTRUCTIONS  CONTINUED)  i 
PRINTL$:GOSUB210 

PRINT"fi\h"L$"'yFOR  EXAMPLE,  TO  WRITE  -• 
iTHE  NAME  FOR  K£L   iYOU  WOULD  -. 
-.WRITE:'*'" 
GOSUB180 
GOSUB180:PRINT"POTASSIUM  ";: 

-.GOSUBl  80:  PRINT  "CHLORIDE!^  ":G0SUB1  80 
PRINT"FOR  £UtJ-2TQ:t^"  :GOSUB180 
PRINT"i^COPPER";  :  GOSUB180  :  PRINT"  (I)  -, 
-.";  :GOSUB180:PRINT"OXIDE^":GOSUB180 
PRINT"FOR  NAt2T£Qi^4:  ":GOSUB180 
PRINT"i^SODIUM  ";  :GOSUB180:PRINT"SUL 
-.FATEt^":GOSUB180 


1220 

1230 

1240 

1250 

1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 

1400 

1410 
1420 
1430 
1440 
1450 
1460 

1470 

1480 
1490 
1500 
1510 

1520 

1530 

1540 

1550 

1560 

1570 
1580 
1590 
1600 

1610 

1620 

1630 

1640 


PRINT"  (INSTRUCTIONS  CONTINUED)  ^l^ 

PRINTL$:GOSUB210 

PRINT"fi^"L$"T^BE  SURE  TO  INDICATE  -. 

-.MULTIVALENT  ELEMENTS 
PRINT"WITH  THE  fiOMAN  NUMERAL  IN  -. 

-.PARENTHESIS. 
PRINT "i/I:HE  EOMAN  NUMERAL  MUST  BE  -i 

-iIN  PARENTHESIS 
PRINT  "NEXT  TO  THE  METAL  IT  GOES  -. 

-.WITH.   USE  A 
PRINT"^(1)  FOR  ONE,  (XI)  FOR  TVJO, 

-^  (111)  FOR 
PRINT"^THREB,  (IV)  FOR  FOUR  AND  -i 

-.(V)  FOR  FIVE. 
PRINT "t^EOTE  that  the  EOMAN  t 

-.NUMERALS  ARE  CAPITAL 
PRINT"LETTERS. 
PRINTL$:GOSUB210 
Q=0:GOSUB1510 

REM  SELECT  NAME  WRITE  FORMULA 
GOSUB870 
N1S=E1S+"  "+ES 
PRINT"fii^"L$ 
Q=Q+1:PRINTQ".  "Fl$:T=0 

PRINT"^^"L$"t" 
INPUT"NAf-lE   _4<4";N$ 
IFN$="_"THENPRINT"TT":GOTO1350 
T=T+1 : IFN$<>N1$THEN1390 
PRINT"^!'"  ;GOSUB460  :GOTO1410 
IFT=lTHENPRINT"\HifiQ13£!     IRY  -. 

-.AGAIN.  ":PRINT"i^"L$:GOTO1350 
IFT=2THENPRINT"i^HR£iNG  AGAIN! 

-.ilAME  IS  "Nl$ 
PRINT "^"L$:GOSUB210 
IFQ<10THEN1300 
GOTO1440 

REM  CALCULATE  PERCENT  &  DISPLAY 
SC%=C/10*100 
PRlNT"fi\('"L5"iY0UR  AVERAGE  IS  -i 

-. "  S  c  %  "  %  " 
PRINT"iF"L$"t*" 
GOSUB1590 
PRINT"^^"L$"^" 
GOSUB210:GOTO40 
PRINT"nT^"LS"4Y0U  WILL  BE  GIVEN  10  - 

-.PROBLEMS,  ONE  AT  A 
PRINT"^hTIME.   lOU  WILL  HAVE  Tl'JO  -. 

-.CHANCES  TO 
PR  I  NT  "t^  ANSWER  CORRECTLY.   IF  YOU  -i 

-lANSWER  CORRECT 
PRINT"THE  FIRST  TIME,  YOU  GET  10  -. 

-iPOINTS.  IF 
PRINT"^YOU  ANSWER  CORRECT  ON  THE  -. 

-.SECOND  TRY, 
PRINT"i|'YOU  GET  5  POINTS. 
PRINT"^"L? 
GOSUB210: RETURN 
REM  COMMENTS  FOR  SCORE 
IFSCIi>  =  90THENPRINT"^VERY  GOOD!  YOU 

-.MAY  MAKE  A  CHEMIST !":  RETURN 
IFSC%>  =  80TnENPRINT"i'^!  ARE  YOU  IN 

-.ENRICHED  CHEMISTRY??":  RETURN 
IFSC%>=^70THENPRINT"^REALLY!  !  YOU  -. 

-.CAN  DO  BETTER  THAN  THAT !";  RETURN 
IFSC%>=60THEMPRINT"^t'COME  QJS !   20  -. 

-.HAVE  A  CHEMISTRY  BOOK?? ":  RETURN 
IFSC'6>=50THENPRINT"^YOU  WERE  -n 

-.READING  THE  QUESTIONS  WEREN'T   -. 

-nYOU  111":  RETURN 
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1650  PRINT"^^I2ID  YOU  SIGN  UP  FOR  THIS  -. 

-■CLASS  ALL  BY    YOURSELF???  ":  RETURN 
1660  REM  SUBRTN  TO  SUPPLEMENT  INSTRUCTIO 

-.NS  ON  WRITING  FORMULAS 
1670  PRINT"fii^"L$"^^THE  FIRST  LETTER  OF  -. 

-.THE  SYMBOL  MUST  BE 
1680  PRINT'HCAPITALIZED  AND  THE  SECOND  -. 

-.LETTER  LOVJER- 
1690  PRINT"CASE  AS  THEY  ARE  USUALLY  -. 

-.WRITTEN. 
1700  PRINT"i^HHEN  A  POLYATOMIC  ION  WHICH  -. 

-tALREADY  CON- 
1710  PRINT"TAINS  A  SUBSCRIPT  IS  TO  BE  -. 

-iSUBSCRIPTED, 
1720  PRINT"i^THE  ION  MUST  BE  IN  PARENTHES 

-.IS  WITH  THE 
1730  PRINTHSUBSCRIPT  OUTSIDE. 
1740  PRINT"\^(  INSTRUCTIONS  CONTINUED) 
1750  PRINT"i^"L$"t^":GOSUB210 
1760  RETURN 

1770  DATA  HYDROGEN, "H",l 
1780  DATALITHIUH,"LI",1 
1790  DATASODIUM, "EA",1 
1800  DATAPOTASSIUM,  "il",l 
1810  DATABERYLLIUM, "BE",2 
1820  DATACALCIUM,"C:a",2 
1830  DATAMAGNESIUM, "MG",2 
1840  DATABARIUM,"1A",2 
1850  DATAZINC,  "JZ^N",2 
1860  DATAALUMINUM, "AL",3 
1870  DATA"C0PPER(1) ", "£U",1 
1880  DATA"COPPER(JU;)  ",  "£U",2 
1890  DATA"IRON(XI) ", "FE",2 
1900  DATA"IR0N(1II) ", "FE",3 
1910  DATA"LEAD(1I) ", "£B",2 
1920  DATA"LEAD(IV) ", "PB",4 
1930  DATAAMMONIUM, "HH4",1 
1940  DATAFLU0RIDE,"F",-1 
1950  DATACHLORIDE,  "ilL",-! 
1960  DATABR0HIDE,"BR",-1 
1970  DATAIODIDE, "I",~l 
1980  DATA0XIDE,"D",-2 
1990  DATASULFIDE,"£",-2 
2000  DATASULFATE,"£Q4",-2 
2010  DATASULFITE,"£Q3",-2 
2020  DATANITRATE,"NQ3",-1 
2030  DATANITRITE,"M52",-1 
2040  DATAHYDROXIDE,"Qli",-l 
2050  DATACARBONATE,  "ilQ3",-2 
206  0  DATAPHOSPHATE, "PQ4",-3  © 


MEMOREX 

Floppy  Discs 

Lowest  phces,  WE  WILL  NOT 
BE    UNDERSOLDII    Buy    any 

quantity  MOOO-  Visa.  Masiercharge 
accepted  Call  free  (800)235-4137 
for    prices    and    information     All 
orders  sent  postage  paid 
PACIFIC   EXCHANGES 

100  Kooihiil  Blvd 
San  Luis  Obispo.  C  A 
93401    lln  Cal  call 
(80fi|  M:Mli:i7  I 


HOBBYWORLD 

ELECTRONICS,  INC. 

19511  Business  Center  Drive,  Dept.  G-5 
Northridge,  California,    91324 

MAX 

16K  Memory  $29.00 


Addl-On  (fncludes  Sfiipping) 

for  TRS-80  ®  Apple®  and  Exidy® 

Euerything  you  need  to  upgrade  your  system. 

Cat  No.        Description 

1156  For  the  TRS-80  Keyboard  Qnit 

1 156A         For  TRS-BO  Exp.  Interface  (prior 

to  4/1/79) 
1 1 56B  For  the  TRS-80  Exp.  Interface 

(after  4/1/79) 
1156C  Apple  II 

1 1 56D         Exidy  Sorcerer 

Verbatim  Diskettes 


minidisks 


DM 


$26.00/Box 

(Includes  Shipping) 

•  Dalalife  Formula 

•  Single  Sided, 
Double  Density 

•  70  Diskettes  per  Box 


Cat  No.  Description  Use  for 

1 147  Soft  Sector  TRS-80,  Apple.  ATARI 

1148  10  Hole,  Hard  Sector  North  Star 

1149  16  Hole,  Hard  Sector  Micropolis 


HOW  TO  ORDER 

Order  by  phone  or  by  mall.  Pay  by  check, 
Visa,  MasterCard,  or  C.O.D.  (C.O.D.  add 
$1.40  add'l.)  Charge  orders:  Include  Card 
No.  and  Expiration  Date. 


Toll  Free  (outside  Calif): 
(800)  423-5387 

Calif  &  Outside  USA: 
(213)  886-9200 

Walch  for  our  new  name,  HW  ELECTRONICS, 
appearing  in  our  ads  next  monlh. 
We've    changed    our    name    because    a(    HW, 
computers  are  more  thanjusi  a  hobby. 
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Using  Named 
GOSUB  And 
GOTO 

Statements  In 
Applesoft  Basic 

M.  R.  Smith 

Using  subroutines  greatly  improves  the  readability  of 
a  program  and  makes  it  easier  to  debug.  However 
remembering  what  a  particular  GOSUB  does  is  often 
difficult.  Was  it  GOSUB  1000  or  GOSUB  2000  that 
was  wanted? 

One  of  the  nice  features  of  Integer  Apple  Basic 
is  its  ability  to  let  you  give  a  name  as  well  as  a  number 
in  GOSUB  statements.  The  following  Integer  pro- 
gram demonstrates  this: 
10       GOSUB  100 
20       SUBl  =100 
30       GOSUB  SUBl 
40       STOP 
100     PRINT  "HERE"  :  RETURN 

Typing  this  program  whilst  using  Applesoft  will  lead 
to  the  error  message  "UNDEFINED  STATEMENT 
IN  30". 

The  purpose  of  this  program  is  to  show  how  to 
use  names  GOSUB  and  GOTO  statements  within 
Applesoft.  By  loading  the  short  machine  language 
program  described  in  this  article,  you  are  able  to  run 
the  Applesoft  program. 

10  GOSUB  100 

20  SUBl  =  100 

30  &  GOSUB  SUBl 

40  STOP 

100  PRINT  "HERE"  :  RETURN 

For  the  murky  details  of  how  it  works  read  the 
section  "PROGRAM  DESCRIPTION".  Otherwise, 
type  in  the  demonstration  BASIC  program  and  type 
RUN.  The  program  includes  a  roudne  to  check  that 
the  DATA  statements  have  been  entered  correctly. 
Once  the  demo  program  has  run  correctly,  the 
machine  language  program  can  be  saved  using 
BSAVE  NAMED.GOSUB,A$300,L$43.  To  have  the 


program  ready  for  future  sessions,  simply  type 
BRUN  NAMES.GOSUB  as  the  first  pan  of  your 
programming  session.  This  will  load  and  fix  the  code. 
It  will  remain  ready  but  out  of  your  way  until  you 
power  down. 

WARNING:   If  you  use  a  RENUMBER  program  to 
reorder  your  program  statements,  you  must  re- 
member that  variables  are  NOT  changed.  Therefore 
your  subroutine  pointers  will  not  be  renumbered; 
you'll  have  to  do  that  by  hand. 

WARNING:  The  instructions  GOSUB  and  ON.  . 
-GOSUB  are  entirely  different.  The  machine  code 
given  here  will  not  allow  the  statement  ON  X  &r 
GOSUB  FNAME,  SNAME. 

Machine  Language  Program  Description 

The  first  statement  (at  $D93E)  of  the  Applesoft 
Interpreter  GOTO  subroutine  is  the  reason  that 
Applesoft  does  not  handle  GOSUB's  and  GOTO's  in 
the  same  manner  as  Integer  Basic.  This  statement 
goes  and  gets  an  integer  number  for  use  within  the 
GOTO.  This  means  that  the  BASIC  statement 
GOSUB  iOOO  is  okay  but  N  =  1000  :  GOSUB  N  is 
not  allowed  as  N  as  a  variable. 

Now  changing  these  memory  locations  to  cause 
the  next  EXPRESSION  to  be  evaluated,  rather  than 
the  next  NUMBER,  allows  us  to  use  named  GOSUB's. 
To  change  these  actual  locations  is  impossible.  Instead 
the  GOSUB  and  GOTO  routines  must  be  relocated 
lower  in  memory  at  $300  (768)  where  they  can  be 
changed.  The  Apple's  ampersand  instruction  (&)  can 
then  be  used  to  make  the  new  commands  operate. 
Lines  19-25.  Set  the  ampersand  vector  (&)  at  $3F5. 
Lines  27-32.  Check  for  GOSUB  or  GOTO  tokens 
after  the  8c. 

Lines  34-^7.  Relocated  version  of  the  monitor 
GOSUB  routine.  This  now  calls  the  new  front  end  of 
the  GOTO  routine. 

Lines  49-52.  New  front  end  to  drive  the  monitor 
GOTO  roudne.  It  jumps  into  the  middle  of  the  old 
GOTO  routine. 
Lines  50  and  51  are  the  actual  major  changes. 

BASIC  Program  Description. 

Lines  20  and  5000-5200.  The  program  first  checks 
that  the  DATA  statements  have  been  correcdy 
entered.  Each  pair  of  DATA  statements  con.sisis  of  16 
numbers  and  a  checksum  which  is  the  jiievious  16 
numbers  added  together.  If  this  17th  number  is  not 
the  actual  sum  of  the  previus  16  numbers,  then  an 
error  is  indicated.  If  all  the  statements  are  okay,  then 
the  code  is  loaded. 
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16KRaiii 
Expansion 

Board  for  the 

Apple  II* 

$195.00 


expands  your  48K  Apple  to 

64K  of  programmable 

memory 

works  with  Microsoft  Z-80 

card,  Visicalc,  LISA  ver  2.0 

and  other  software 

eliminates  the  need  for  an 

Applesoft*  or  Integer  Basic 

ROM  Card 

switch  selection  of  RAM  or 

mother  board  ROM 

language 

includes  installation  and  use 

manual 

fully  assembled  and  tested 

Disbributed  By 


COMPUTER 

DATA 

SERVICES 


P.O,  Box  469 

Lincoln,  MA  01 773 

(617)259-9791 

*Apple  II  and  Applesoft  are  trademarks  of  Apple 
Computer,  Inc. 


ANDnOMETW 


M  INCORPORATED 

W  P.O.  Box  19144 

Greensboro,  NC  27410 

(919)  852-1482 


"Formerly  Andromeda  Computer  Systems 


66 


COMPUTEI 


May,  1981,  Issue  12. 


Line  40.  Sets  the  ampersand  vector.  This  is  not 
necessary  if  the  machine  code  is  BRUN  into  memory 
but  is  necessary  if  the  code  is  BLOADed. 
Lines  60-80.  These  set  the  subroutine  names. 
Lines  100—140.  Demonstrate  the  new  instructions. 
Lines  1000-3020.  Demonstration  Subroutines. 

References 

"AMPERSAND-INTERPRETER"  by  R.  M.  Mottala  in  Nibble 
#6,  1980,  p27. 

"APPLESOFT  INTERNAL  ENTRY  POINTS"  by  Apple 
Computer  Inc.  in  Apple  Orchard,  March/April  1980,  pl2. 
"SOME  ROUTINES  IN  APPLESOFT  BASIC"  by  J.  Biittcrfield 
in  COMPirrt!,  September/October  1980,  p68. 
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:t.o     re:m     load  the  f^outine  - 

NaF;;MAL  GOSUB 

2  0   GOSUB  50  0  0 

3  0   REM   ESTAE:LISH  THE 

AMP  El-;:  SAND  UECTDR 
'■{(I   CALL  76a 

5  0   REM  ESTABLISH  NAMES  OF  SUBROUTINES 

6  0  JOHN  ■■■-    :l,OQO 

7  0  PETE  ^■■■■-    20  0  0 

8  0    PHREDD    ■■■■■■■■    3000 

9  0   REM   CALL  THE  SUBROUTINES 
:L0  0   &   GOSUB  JOhIN 

:!.:!. 0  Li      GOSUB  PETE 

120  K       GOTO  PHREDD 

130  PRINT  "DIDNOT  WORK" 

1^10  STOP 

10  00   PRINT  "THIS  IS  JOHN" 

1010   PRINT  "HERE  BY  A  NAHED  GOSUB" 

1020   PRINT  J  RETURN 

20  0  0   PRINT  "THIS  IS  PETE" 

2010   PRINT  "HERE  BY  A  DIFFERENT 

NAMED  GOSUB" 
20  2  0   PRINT  :  RETURN 
30  0  0   PRINT  "THIS  IS  PHREDD" 
3010   PRINT  "HERE  BY  A  NAMED  GOTO" 
3020   STOP 

•'I9V0   REM   LOAD  IN  ROUTINE 
50  0  0  LOU!  ■■:::    768 1  HIGH  ■■■■^-    835 
5010  OK  ^^    1 

5020   REM   LOAD  IN  GROUP  OF  SIXTEEN 
5030   FOR  J  -^--^    LON  TO  HIGH  STEP  16 
SO'^0  CHECK  -  0 
5050   FOR  K  ■■■■^■-    J  TO  J  +  15 
50  60   READ  IT 
5070  CHECK  ■■■■■■    CHECK  +  IT 
5080   NEXT  K 

5090   REM   CHECK  IF  CHECK  SUM  OKAY 
510  0   READ  SUM 
511.0  L$  ^^  "OKAyt  IF  CHECK  <   >  SUM 

THEN  Li^  ==  "BAD"  J  OK  =    0 
5120   PRINT  \..M 
513  0   NEXT  J 

51^0   IF  OK  ■■■■■■■■    0  THEN   STOP 
5150   REM   THINGS  ARE  OKAY  -■  LOAD  INTO 
5160   RESTORE  t    FOR  J  -  LOW  TO  HIGH  STIi 
517  0   FOR  K  =-  J  TO  J  +  15:  READ  ITS  PO 
5180   READ  ITS  NEXT  J 

5190   PRINT  "BLOAD  OKAY" J  PRINT  I     PRIN 
52  0  0   RETURN 

6000   DATA   I69,76f  l^tlf2^i5,3.l6SM6,ll 
6010   DATA  3,  169,3,  1^*1,2^7,  3,  96^1868 
6020   DATA    20  1  ,  176  ,  2-10  ^  9  .  20  1  ,  171  ,  2''t  0 
6030   DATA  16,76,19,212,169,3,32,1957 
60^10   DATA  21'l,211,165,  185,72,  165,  18^1, 
6050   DATA  1 18  ,  72  ,  165  ,  1 17  ,  72  j- 169  ,  176  ,  2 
6060   DATA  72.32,55,3,76,210,215,32,17 
6070   DATA  0,32,123,221,32,32,231,1593 
60  80   DATA   76,65,217,0,0,0,0,0,0 
6090   DATA   0,0,0,0,0,0,0,358 
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Bugs  in  your  Apple? 

DDT 

Disco-Tech's  Disc  Drive  Timer  program 

zaps  disc  drive  problems! 


CORRECT 
300 


ItrOO  39803  30900  ■  IDI.QO  302. 00  101  00 

llll  III  II  llll  lllll  lllll  llllllill 


Analyze  disc  drive  motor  speed  on  a  routine  basis  with 
an  adjustable  real-time  speedometer.  Accurate  to  one- 
tenth  of  one  r.p.m.  out  of  300  r.p.m. 
Fine-tune  disc  drive  motor  speed  yourself.  All  you  need 
is  DDT,  two  screwdrivers,  and  five  minutes'  time. 


ti!9Q95 

'♦'fc^  Poslpaid 
CiilJoiiiia  residents  add  bX  lax 
Diskt'tty  &  completf  manual. 


Engineering      Business 
Arcliitecturc     Utilities 
Surveying 


Also  available  for  TRS-80  Model  I. 

To  order  or  for  more  information, 
write  or  call 


dwi  lit  ui    ^a 
ISC^ 


microcomputer 
products 
I  T.M.  a  division  of 

Morton  Technologies,  Inc. 

1150  Coddingtown  Center 

P.O.  Box  11129   •   Santa  Rosa,  CA  95406 

707/523-1600 

•••••••••••••••• 
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0  3 

3  -i 

GDSUB 

LDA 

*it;3 

1  N  0  R  M  A 1...  G  0  S  U  B  !='  R  0  C  E  D  U  R  E 

031FJ20 

i:)6 

D3 

35 

J  BR 

STACK 

? RELOCATED  FROM  $D92l 

0322? AS 

B9 

36 

LDA 

TXTPTFI 

1  S  r  (J  R  E  C;  l.J  R  R  E  NT  T  E  X  T  F  0 1 H  T  E  R  S 

0  324? '18 

37 

F't-IA 

03215?  A3 

B8 

33 

LDA 

rXTPTL 

0327?  48 

39 

PHA 

0323  !A5 

76 

4  0 

I...DA 

CLINFI 

? STORE  CURRENT  LINE  NUMBER 

032A?48 

4 1 

FFIA 

0  32B?A!5 

7 '5 

4;! 

I..  DA 

CLINL 

0  32D?'18 

4.:! 

PFIA 

032F?A9 

BO 

4  1 

LDA 

#;liBO 

lli'    NEEDS  THIS 

0  330? 48 

45 

F-HA 

0331.  ?  20 

37 

0  3 

46 

J8R 

GOTO 

too    A  GOTO 

0334 ?4C 

02 

07 

4  ■ 

JMP 

MGOSUB 

I  CONTINUE  NORMAL  GOSUB 

0337? 

43 

f 

0337J20 

B 1 

DO 

49 

GOTO 

JSR 

GETCHR 

;Ger  next  char 

0  33A?20 

7B 

DD 

5  0 

J3F< 

FRMEyL 

I  E  {}  A  L  U  A  T  E    N  F:  X  T  E  X  R  R  E  S  S 1 0  N 

D33DJ20 

52 

E7 

51 

vISl^^ 

FI XGOTU 

?F.IX  GOTO  LOCATION 

0  340 ?4C 

41 

D9 

52 

JMP 

NGiTfO 

?i:;ONTINUE  NORMAL  GOTO  ROUTINE 
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Commas, 
Colons  And 
Quote  Marks 
Too 


Craig  Peterson 
Santa  Monica,  CA 

Have  you  ever  wanted  to  be  able  to  input  commas, 
colons  or  quotation  marks  as  part  of  an  input 
statement  to  one  of  your  Applesoft  programs?  But, 
hard  as  you  may  try,  Applesoft  kept  coming  back 
with  "EXTRA  IGNORED."  Contact  4  from  Apple 
Computer,  Inc.,  helped  you  by  suggesting  the  use 
of  the  GET  statement,  but  all  that  B$  =  B$  +  A$ 
stuff  meant  that  you  often  had  to  endure  string 
garbage  cleanup  delays.  Then  Contact  6  seemed  to 
offer  the  ultimate  solution,  totally  avoiding  garbage 
collection.  But  was  it?  Besides  requiring  a  small 
machine  language  program,  there  was  a  subde 
problem  you  might  not  have  been  aware  of.  The 
input  routine  used  to  till  the  input  buffer  made  no 
allowance  for  the  high  bit  of  each  character  in  the 
input  line.  The  routine  used  to  fill  the  input  buffer 
left  the  high  bit  set,  just  as  it  comes  from  the 
keyboard.  But  Applesoft  wants  the  high  bit  to  be 
zero  for  its  string  characters.  The  line  will  print 
correctly  and  will  look  on  the  screen  just  like  what 
you  typed  in,  but  if  you  ever  try  an  IF  IN$  =  "Q", 
you'll  never  get  a  match.  Or  if  you  try  to  VAL 
(IN$),when  IN$  was  input  as  "  1 234",  you'll  get  a 
value  of  0. 

The  solution  to  this  dilemma  is  in  the  program 
listed  below.  The  subroutine  shown  in  lines  1000  to 
1020  (for  Applesoft  ROM  Basic)  will  gather  any 
input  for  you  and  place  it  into  the  variable  IN$, 
even  commas,  colons  and  quote  marks.  The  only 
exempt  characters  are  the  standard  keyboard 
escape  sequences.  So,  who  is  the  litde  man  at 
54572?  Well,  he's  the  Applesoft  equivalent  of  the 
monitor's  keyboard  input  rouUne,  with  the  differ- 
ence being  that  he  strips  the  high  bit  from  all  of  the 
input  characters.  So  line  1000  fills  the  input  buffer 
with  normal  Applesoft  string  characters  gathered 
from  the  keyboard.  Line  1010  finds  the  length  of 
the  string,  and  line  1020  finds  the  IN$  variable  and 
stuffs  its  pointers  with  the  right  info  to  point  to  the 
keyboard  buffer.  Then  IN$  is  relocated  into  RAM. 
away  from  the  keyboard  buffer.  It  is  not  necessary 
for  IN$  to  be  the  first  variable  used  in  the  program. 
Lines  1000-1020  can  be  placed  anywhere  in  your 
program.  The  pointers  for  IN$  are  found  through 
the  magic  of  locations  131  and  132,  which  hold  the 
address  of  the  pointers  for  the  last  used  variable. 
It's  fast,  it  totally  avoids  string  garbage  build-up, 


and  it's  done  in  Basic.  None  of  that  nasty  machine 
language  stuff. 

One  additional  note.  Not  only  does  this  routine 
work  slick  for  keyboard  input,  but  it  also  performs 
the  same  super  feat  for  disk  input,  which  can  be 
real  handy.  Commas,  etc.,  in  the  middle  of  a  name 
file  cause  no  difficulty  when  read  from  the  disk. 
Please  note,  however,  that  this  routine  limits  the 
size  of  an  input  string  to  239  characters  just  like 
the  Applesoft  INPUT  statement  does. 

So  if  you  need  it,  try  it.  It's  an  easy  solution  to 
a  common  problem. 


10 


2U 

30 


40  : 
1 OOC 
10 IC 

102(: 


HOME  :  VTAB  4:  PRINT  "INPUT  A 
NYTHING  THAT  YOU  WANT..":  PRINT 
:  GOBUB  1000:  PRINT  :  PRINT 
"VOILA..":  PRINT  :  PRINT  IN* 
:  END 

REM    LINES  1000  TO  1020  ARE 
A  SUBROUTINE  THAT  PUTS  ANY 
INPUT  INTO  IN* 

)   CALL  54572 

j   FOR  B  =  512  TO  751:  IF   PEEK 
<B)  <   >  0  THEN   NEXT 

:>  IN*  ■■=    "":  POKE   PEEK  <131)  + 
256  *   PEEK  (132.)  +    1,0:  POKE 

PEEK  (131)  +  256  *   PEEK  (1 
32)  +2,2:  POKE   PEEK  (131)  + 
256  *   PEEK  (132),B  -  512:IN 
*  =   MID*  (IN*,1):  RETURN     © 
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Generating 
Lower  Case 
Text  On  The 
Apple  II  Plus 
Using  The 
Paymar  Chip 

David  Shapiro 
Btoomington,  IN 

Introduction 

The  following  program  will  allow  lower  case  text  to 
be  displayed  on  an  Apple  II  Plus  which  is  equipped 
with  a  Paymar  chip.  The  hardware  requirements 
involve  the  "older"  Apple  with  RAM  configuration 
blocks  (an  "I.C.  impersonator"  which  only  contains 
jumper  wires  and  is  labeled  with  "16K"),  and  the 
PAYMAR  lower  case  adapter,  presently  advertised 
as  the  "original  LCA-1  (TM)".  By  appending  this 
routine  to  a  BASIC  program,  lower  case  characters 
can  be  embedded  inside  of  quotation  marks  fol- 
lowing a  PRINT  command  by  simply  converting 
the  corresponding  upper  case  character  in  the 
given  string.  When  the  BASIC  statement  involving 
the  PRINT  command  and  the  string  are  executed, 
the  display  of  upper/lower  case  text  is  immediate. 
Lower  case  characters  can  also  be  converted  back 
to  upper  case  using  this  routine. 

Sample  Use  Of  The  Lower  Case  Converter 

Once  tills  routine  is  appended  to  a  BASIC  program, 

it  can  then  be  used  for  converting  between  upper 

and  lower  case  characters: 

ABCDEFGHIJKLMNOPQRSTUVWXYZ 
abcdefghijklmnopqrstuvwxyz 

A  tvpical  program  statement  may  contain  the 

string  "POUR  THE  SOLUTIONS."  and  lower  case 

conversion  may  be  desired  on  all  characters  after 

the  "P".  The  following  brief  example  initially 

LISTs  the  statement  containing  this  string,  the 

lower  case  converter  program  (which  starts  at  line 

number  63000)  is  then  RUN,  and  finally  the 

statement  containing  the  now-converted  text  is 

reLISTed. 

1UST20 

20  PRINT  "POUR  THE  SOLUTIONS." 

]RUN63000 

WHAT  LINE  DO  YOU  WANT  CONVERTED?  20 


I  HAVE  FOUND  THE  LINE. 

POUR  THE  SOLUTIONS. 

DO  YOU  WANT  TO  CHANGE  ANYTHING? 
START  WITH  WHICH  CHARACTER?  2 
END  WITH  WHICH  CHARACTER?  16 

Pour  the  solutions. 

DO  YOU  WANT  TO  CHANGE  ANYTHING? 

]LIST20 

20  PRINT  "Pour  the  solutions." 

The  program  initially  prompts  the  user  for 
the  line  number  of  the  BASIC  statement  to  be 
converted.  A  search  through  the  Apple's  RAM 
continues  until  that  line  number  is  found,  where- 
upon the  characters  within  quotatin  marks  are 
then  displayed  (if  no  such  line  number  exists,  the 
program  informs  the  user).  A  decision  to  change 
the  string  contents  is  then  entered  (Y  in  this  case). 
Character  limits  for  the  conversion  are  individually 
entered,  with  only  the  characters  from  the  upper/ 
lower  case  sets  (see  above)  sequentially  counted 
(the  spaces  on  either  side  of  "THE"  were  ignored). 
The  conversion  will  then  start  with  "0"  (the  2nd 
character)  and  terminate  with  the  final  "S"  (the 
16th  character),  with  the  resultant  form  displayed 
for  more  changes.  No  further  changes  were  made 
(input  of  "N"),  and  the  RESET  key  was  pressed  to 
terminate  execution  of  this  routine.  This  particular 
statement  was  then  re-LISTed,  displaying  the 
quote-embedded  lower  case  text. 

More  Lower  Case  Converter  Details 

The  case  conversion  occurs  between  the  user-de- 
fined limits  in  a  continuous  fashion.  If  there  are 
two  (or  more)  separated  segments  in  the  same 
string  that  are  to  be  converted,  then  each  segment 
conversion  must  be  done  individually.  The  string  is 
I  e-dispiayeti  after  each  conversion  for  further 
changes  if  so  desired.  An  individual  character  can 
also  be  converted  if  the  lower  and  upper  numerical 
limits  are  identical. 

The  first  time  "RUN  63000"  is  executed,  the 
search  for  the  input  line  number  commences  at  the 
beginninng  of  the  program.  This  search  examines 
the  appropriate  locations  in  RAM  which  the  pro- 
gram currently  occupies,  and  with  each  new  exam- 
ination moves  sequentially  through  the  program 
(increasingly  higher  memory  locations)  in  an 
attempt  to  Ihid  the  line  number,  A  variable  (ML) 
contains  the  current  RAM  location  when  the  line  is 
eventually  found.  After  making  the  necessary 
character  changes  in  this  statement  as  stipulated  by 
the  user,  the  search  ioi"  the  next  line  number  will 
begin  at  this  present  memory  location  (ML).  This 
optimizes  the  speed  with  which  the  program 
searches  for  the  next  line  number.  If  the  next  line 
number  is  less  than  the  last  line  number,  or  if  it 
does  not  exist  in  the  program,  then  the  current 
RAM  location  variable  ML  is  re-initialized  to  zero. 
The  user  is  informed  that  the  line  can  not  be 
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QUALITY  DISK  SOFTWARE 

BACKED  BY  ON-GOING  APPLICATIONS  SUPPORT 


APPLE  tl 


HOME  FINANCE  PAK  I:  Entire  Series  S49.95  ®  ® 

CHECK  REGISTER  AHH  BUDGET:  This  comprehensive  CHECKING  ACCOUNT 
MANAGEMENT  SYSTEM  nol  only  keeps  complete  tecords,  it  also  gives  you 
the  analysis  and  control  tools  you  need  to  actively  manage  your  account. 
The  system  provides  routmes  lor  BUDGETING  INCOME  AND  EXPENSE.  AUTO- 
MATIC CHECK  SEARCH,  and  BANK  STATEMENT  RECONCILING.  CRT  or  printer 
reports  are  produced  for  ACTUAL  EXPENSE  vs  BUDGET.  CHECK  SEARCH 
DISPLAY  RECONCILIATION  REPORT  and  CHECK  REGISTER  DISPLAY  by  month. 
Check  entry  is  prompted  by  user-delined  menus  of  standard  purposes  and 
recipient  codes,  speeding  data  entry  and  reducing  disk  storage  and 
retrieval  time.  Six  tislds  of  data  are  stored  tor  each  check:  amount,  check 
no.,  date,  purpose,  recipient  and  TAX  DEDUCTIBLE  REMINDER.  CHECK  SEARCH 
routines  allow  searching  on  any  of  these  data  fields.  Up  to  100  checks/mo. 
storage S39.95 

SAVINGS:  Account  managemenl  system  for  up  to  20  separate  Savings 
accounts.  Organizes,  files  and  displays  deposits,  withdrawals  and  interest 
earned  lor  each  account ,  $1^1,95 

CREDIT  CARD:  Get  Control  of  your  credit  cards  with  this  program.  Organizes, 
stores  and  displays  purchases,  payments  and  service  cfiarges  lot  up  to  20 
separate  cards  or  bank  loans.    Sl'1.95 

UNIVERSAL  COMPUTING  MACHINE:  S49.95  ® 

A  user  programmable  computing  system  slructtiied  around  a  50  row  x  50 
column  table.  User  defines  row  and  column  names  and  equations  farming  a 
unique  compuliiig  machine.  Table  elements  can  be  multiplied,  divided, 
subtracted  or  added  to  any  other  element  Hundreds  of  unique  computing 
machines  can  be  defined,  used,  stored,  and  recalled,  for  later  use.  Excellent 
for  sales  forecasts,  budgets,  inventory  lists,  income  statements,  production 
planning,  project  cost  estimales-in  short  for  any  planning,  analysis  or 
reporting  problem  that  can  by  solved  with  a  table. 

COLOR  CALENDAR:  §29,95® 

Got  a  busy  calendar'  Organize  it  with  Color  Calendar.  Whether  tfs 
birthdays,  appmntmenls.  business  meetings  or  a  regular  office  schedule, 
this  program  is  the  perfect  way  to  schedule  your  activities. 
The  calendar  display  is  a  beautiful  HI-RES  color  graphics  calendar  of  the 
selected  month  with  each  scheduled  day  highlighted  in  color.  Using  the 
daily  schedule,  you  can  rei/iew  any  day  of  the  month  and  schedule  an  event 
or  activity  in  any  one  of  20  time  slots  from  8:00  A.M.  to  5:30  P.M. 

BUSINESS  SOFTWARE;         Entire  Series  5153.95®® 

MICROACCOUNTANT:  The  ideal  accounting  system  for  small  businesses. 

Based  on  classic  T-accounis  and  doubie-entry  booking,  this  efficient 

program  provides  a  journal  lor  recording  posting  and  reviewing  up  to  1.000 

transactions  per  month  to  any  one  ol  300  accounts.  The  program  produces 

CRT  and  printer  reports  coveririg: 

TRANSACTION   JOURNAL  BALANCE   SHEET 

ACCOUNT  LEDGERS  INCOME  AND   EXPENSE   STATEMENT 

Includes  a  short  primer  on  Financial  Accounting,  (48K)    S49.95 

UNIVERSAL  BUSINESS  MACHINE:  This  program  is  designed  to  SIMPLIFY  and 
SAVE  TIME  for  the  serious  businessman  who  must  periodically  Analyze, 
Plan  and  Estimate.  The  program  was  created  using  our  Universal  Computing 
[Machine  and  it  is  programmed  to  provide  the  following  planning  and 
forecasting  tools 

CASH   FLOW  ANALYSIS  SALES  FORECASTER 

PRDFORMA   PROFIT   &   LOSS  SOURCE  AND   USE   OF   FUNDS 

PROFORMA   BALANCE   SHEET  JOB   COST   ESTIMATOR 

REAL  ESTATE  INVESTMENT  INVENTORY  ANALYSIS 

Price,  including  a  copy  ol  the  Universal  Computing  Ivlachine  ....  S89,95 

BUSINESS  CHECK  REGISTER  AND  BUDGET:  Our  Check  Register  and  Budget 
progiams  expanded  to  include  up  to  50  budgetable  items  and  up  to  400 
checks  per  month  Includes  bank  slatemenl  reconciling  and  automatic 
check  search  I48K) S49.95 

ELECTRONICS  SERIES  VOL  I  &  II:  Entire  Series  SZ59.95 

LOGIC  SIMULATOR:  SAVE  TIME  AND  MONEY,  Simulate  your  digital  logic 
circuits  before  you  build  them,  CMOS,  TTL,  or  whatever,  if  lis  digital  logic, 
this  program  can  handle  it.  The  piogram  is  an  Interactive,  menu  driven, 
(ull-fledged  logic  simulator  capable  of  simulating  the  bit-time  response  of  a 
logic  network  to  user-specified  input  patterns.  It  will  handle  up  to  1000 
gates,  including  HANDS,  NORS,  INVERTERS,  FLIP-FLOPS.  SHIFT  REGISTERS. 
COUNTERS  and  user-defined  MACROS,  up  to  40  user-defined  random,  or 
binary  input  patterns.  Accepts  network  descriptions  from  keyboard  or  from 
LOGIC  DESIGNER  lor  simulation      3159,96    ®® 


TRS*80  W 


LOGIC  DESIGNER:  Interactive  HI-RES  graphics  program  for  designing  digital 
logic  systems.  Draw  directly  on  the  screen  up  to  10  different  gate  types, 
including  HAND,  NOR,  INVERTER.  EX-OR.  T-FLDP. JK-FLOP.D-FLOP,  RS-FL0P.4 BIT 
COUNTER  and  N-BIT  SHIFT  REGISTER,  User  interconnects  gates  using  line 
graphics  commands.  Network  descriptions  for  LOGIC  SIMULATOR  generated 
simultaneously  with  the  CRT  diagram  being  drawn S159,95(T| 

MANUAL  AMD  DEMO  DISK:  Instruction  Manual  and  demo  disk  illustrating 
capabilities  ol  both  program  (s)    529,95  (J)(J) 

ELECTRONIC  SERIES  VOL  III  &  IV:  Entire  Series  S259.95 

CIRCUIT  SIMULATOR:  Tired  of  trial  &  error  circuit  design'  Simulate  &  debug 
your  designs  before  you  build  them!  With  CIRCUIT  SIMULATOR  you  build  a 
model  ol  your  circuit  using  RESISTORS,  CAPACITORS.  INDUCTORS.  TRANSISTORS. 
DIODES.  VOLTAGE  and  CURRENT  SOURCES  and  simulate  the  waveform  response 
to  in  puis  such  as  PULSES,  SINUSOIDS.  SAWTOOTHS.  etc, ,  ,all  lully  programmable. 
The  output  is  displayed  as  an  OSCILLOSCOPE-STYLE  PLOT  of  the  selected 
waveforms  (Apple  only)  or  as  a  printed  table  of  voltage  vs  time.  Handles  up  to 

200  notes  and  up  to  20  sources.  Requires  48  RAM S159.95  (ft)  0 

CIRCUITDESIGNER:  Interactive  HI-RES  graphics  programfordesigning  electronic 
circuits.  Draw  directly  on  the  screen  up  to  10  different  component  types, 
including  those  referenced  above.  Components  interconnect  list  for  CIRCUIT 
SIMULATOR  generated  automattcally.  Requires S159.95 

MATHEMATICS  SERIES:  Entire  Series  $49.95 

STATISTICAL  ANALYSIS  L  This  menu  driven  program  performs  LfNEAR 
REGRESSION  analysis,  determines  the  mean,  standard  deviation  and  plots 
the  frequency  distribution  of  user-supplied  data  sets.  Printer,  Disk.  I/O 
routines    819-95 

NUMERICAL  ANALYSIS:  Hl-RES2-Dimensional  plot  of  anyfunction.  Automatic 
scaling  At  your  option,  the  program  will  plot  the  function,  plot  the 
INTEGRAL,  plot  the  DERIVATIVE,  determine  the  ROOTS,  MAXIMA.  MINIMA. 
INTEGRAL  VALUE    S19.95 

MATRIX:  A  general  purpose,  menu  driven  program  for  determining  the 
INVERSE  and  DETERMINANT  of  any  matrix,  as  well  as  the  SOLUTION  to  any  set 
of  SIMULTANEOUS  LINEAR  EQUATIONS 319.95 

3-D  SURFACE  PLOTTER:  Explore  the  ELEGANCE  and  BEAUTY  of  MATHEMATICS 
by  creating  HI-RES  PLOTS  of  3-dimensional  surfaces  from  any  3-yariable 
equation.  Disk  save  and  recall  routines  for  plots.  Menu  driven  to  vary 
surface  parameters.  Hidden  line  or  transparent  plotting 819.95 

ACTION  ADVENTURE  GAMES:      Entire  Series  $29.95  ® 

RED  BARDH:  Can  you  outfly  the  RED  BABDH7  This  fast  action  game  simulates 
a  machine-gun  DOGFIGHT  between  your  WORLD  WAR  1  Bl-PUNE  and  the 
barons.  You  can  LOOP.  DIVE.  BANK  or  CLlMB-and  so  can  the  BARON.  In  HI-RES 
graphics  plus  sound S14.95 

BATTLE  OF  MIDWAY:  You  are  in  command  of  the  U.S.S.  HORNETS"  DIVE- 
BOMBER  scuadron.  Your  targets  are  the  Aircraft  carriers.  Akagi.  Soryu  and 
Kaga.  You  must  fly  your  way  through  ZEROS  and  AA  FIRE  to  make  your 
DIVE-BOMB  run.  In  HI-RES  graphics  plus  sound S14.95 

SUB  ATTACK:  It's  April  1943  The  enemy  convoy  is  headed  for  the  CONTROL 
SEA.  Your  sub.  the  MORAY,  has  just  sighted  the  CARRIERS  and  BATTLESHIPS' 
Easy  pickings.  But  watch  out  for  the  DESTROYERS  -  they're  fast  and  deadly. 
In  HI-RES  graphics  plus  sound S14.95 

FREE  CATALOG-All  programs  are  supplied  on  disk  and  run  on  Apple  II  w/Disk 
8.  Applesoft  ROM  Card  &  TRS-BO  Level  11  and  require  32K  RAM  unless 
otherwise  noted.  Detailed  instructions  included.  Orders  shipped  within  5 
days.  Card  users  include  card  number.  Add  S1.50  postage  and  handling 
with  each  order,  California  residents  add  6Vi1i) sales  lax.  Foreign  orders  add 
35.00  postage  and  handling. 


SPECTRUM  SOFTWARE 

142  Carlow.  P.O.  Box  2084 
Sunnyvale,  CA  94087 


FOR  PHONE  ORDERS:  |408)  738-4387 
DEALER  INQUIRIES  INVITED. 
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found,  and  the  next  iine  number  search  must  start 
at  the  beginningof  the  program.  This  unnecessarily 
increases  the  search  time;  therefore,  for  maximum 
speed-execution  of  the  program,  all  entered  line 
numbers  must  exist  in  the  program,  and  they 
should  be  entered  by  increasing  value. 

The  case  conversion  between  upper/lower  case 
in  reciprocal;  i.e.,  designated  upper  case  characters 
will  be  converted  to  lower  case,  and  lower  case 
characters  will  be  changed  to  upper  case.  Also,  if 
the  cursor  is  used  to  read  a  BASIC  statement 
containing  a  string,  any  lower  case  characters  will 
be  converted  back  to  upper  case  (an  easy  method 
for  converting  a  mixed-case  string  to  all  upper 
case). 

The  line  numbering  of  this  routine  begins  at 
63000  since  lower  line  numbers  should  always  be 
used  when  writing  a  BASIC  program.  It  may  be 
entered  after  the  END  command  and  accessed  at 
the  user's  convenience.  Typing  "RUN  63000"  from 
the  keyboard  RUNs  the  routine;  pressing  the 
RESET  key  will  terminate  its  execution. 

Program  Listing  And  Explanation 

63000  Line  number  to  be  converted  input  as  LN. 
63010   Initialization  of  ML  to  start  of  BASIC  on 
first  RUN  of  program  or  when  line  number  is  not 
found;  ML  is  the  memory  location  currently  being 
examined, 

63020  NL  equated  to  RAM  location  of  start  of 
next  BASIC  statement.  TL  is  equated  to  the  line 
number  of  BASIC  currently  being  examined, 
63030  Jump  from  search  loop  if  line  number  is 
found. 

63040  jump  from  search  loop  if  line  number  is 
not  found. 

63050  Equate  ML  to  RAM  location  of  the  next 
BASIC  statement. 

63070  Loop  to  examine  each  character/token  in 
the  current  BASIC  statement.  Check  for  quotation 
mark  {ASCII  code  =34).  MODE  is  a  "toggle";  set 
to  0  when  first  quote  is  found. 
63080  Printing  of  characters  after  1st  quote  and 
up  to  2nd  quote. 
63090  Close  PRINT  loop. 

63100  If  no  changes  ("N")  execution  transferred 
to  63000,  All  other  input  (including  "Y")  defaults 
to  631 10. 

63110-63120   Limits  to  define  character  conver- 
sion. 

63130   Loop  examination  of  each  character/token 
in  BASIC  statement.  When  1st  quote  is  found, 
MODE  is  set  to  0. 

63140  If  the  character  is  between  quotes  and 
alphabetic,  then  counter  PO  is  incremented.  When 
the  counter  is  between  the  stipulated  character 
limits,  the  character  is  converted  to  upper  case 
(add  32)  or  lower  case  (subtract  32)  depending  on 
the  original  value  of  Q. 


63150  Close  conversion  loop.  Control  transferred 
to  63070  for  any  further  changes. 


93000   INPUT  "HHmT  line  DO  VOU  Hfi 

NT  COHUERTED-^'  "iLH 
63010  IF  HL  =  0  THEN  ML  =  256  * 

PEEK  <104>  +  PEEK  <i03) 
63020  NL  =  -EEK  C ML)  +  256  *  PEEK 

':ML  +  1>:TL  =  PEEK  <  HL  +  2::' 
+  256  *  PEEK  <ML  +  3 ) 
63030  IF  TL  =  LH  THEN  63068 
63048  IF  NL  (  HL  OR  TL  >  LN  THEN 
PRINT  "LINE  NOT  FOUND. ":HL= 

0:  PRINT  :  GOTO  63008 
63050  HL  =  NL:  GOTO  63820 
63060  PRINT  "I  HflUE  FOUND  THE  LI 

HE.  " 
S3070  PRINT  jHODE  =  1:  FOR  H  =  H 

L  -1-  4  TO  NL:Q  =  PEEK  <R):  IF 

Q  =  34  THEN  HGDE  =  1  -  MODE 
63080  IF  HODE  =  8  DND  0  •::   >  7.4   THEN 

PRINT  CHR$  <Q::'i 
63090  NEKT  :  PRINT 
83100  PRINT  :  PRINT  "DO  VOU  HRNT 
TO  CHANGE  RNVTHING'^-  "a    GET 

fl$:  PRINT  :  IF  fr*  =  "N"  THEN 

63000 
63110   INPUT  "START  HUH  NHICH  CH 

flRFlCTER'-  "iS 
63120  INPUT  "END  NITH  NHICH  CHAR 

P.CTER'^-  "iE:PO  =  Q 
63130  MODE  =  1:  FOR  fi  =  HL  +  4  TO 

NL:Q  =  PEEK  cfl):  IF  Q  =  34  THEN 

MODE  =  1  -  HODE 
63140   IF  HODE  =  8  AND  Q  >  64  RHp 

Q  <  128  THEN  PO  =  PO  +  1 :  IF 

PO  >  =  S  fiND  PO  <  =  E  THEN 
POKE  fi^Q  +  32:  IF  A  >  :=fR  THEN 
POKE  fl.Q  -  32 
63150  NErtT  :  GOTO  63070  Q 


Apple  Authors 


COMPUTE!  is  looking  for  applica- 
tions articles  aimed  at  beginners 
and  intermediate  programnners. 
We're  specifically  interested  in 
programming  hints,  tutorials,  ar- 
ticles written  to  help  users  get 
more  out  of  their  machine. 
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MIPLOT: 

the  right 
plotter 
at  the 
right 
price 


Designed  for  straight  forward  interface  to  any  micro- 
computer tfiat  outputs  tfie  ASCII  code,  MIPLOT  can  even 
be  used  by  operators  witti  no  plotter  experience. 

•  Incorporates  pre-programmed  "intelligent"  (unctions  required 
tor  producing  graphs  and  drawings 

•  Solid  and  broken  line  types  can  be  specified 

•  Built  in  character  generator  for  letters,  numbers  and  symbols 

•  Ctiaracters  can  be  enlarged  and  rotated  to  four  orientations 

•  Special  printer  mode  outputs  character  data  as-is 

•  Uses  commonly  available  hard  fiber-tip  pens 

•  Maximum  plot  speed  approximately  2  inches  per  second 

•  Built  in  self-test  mode 

OnlyM,200 

at  Systems  Formulate  Corporation 
(plus  shipping  &  handling) 


Call  today  (or  more  information  or  to  place  your  phone  order; 
(415)  326-9100  •  39  Town  &  Country  Village,  Palo  Alto,  CA  94301 . 
We  honor  Master  Charge.  Visa,  ctieck  or  money  order  (California  residents  add 
6  5%  sales  tax) 


(iX)  SYSTEMS  FORMULATE  CORPORATION 

V  J   39  TUTwnV  Country  VUUtfs*  Palo  MUj.Cftllfoml*M30l 


Computer  House  Division 


PROGRAMS  FOR  COMMODORE  AND  APPLE 

Legal  accountfng  Demo 

$15.00 

Legal  accounting  Program 

995.00 

Machine  Part  Quote  Demo 

15.00 

Machine  Part  Quote  Program 

325.00 

Mailing/phone  list 

80.00 

Political  Mail/phone  list 

130.00 

Beams,  structural 

115.00 

Trig/Circle  Tangent 

110.00 

Spur  Gears 

35.00 

Bolt  Circles 

25.00 

Filament  Wound  TAnks 

125.00 

Scrunch 

25.00 

PROGRAMS  FOR  COMMODORE  ONLY 

A/P.A/R,  Job  Cost  &  Job  Est. 

370.00 

Inventory 

95.00 

Financial 

175.00 

Real  Estate  Listings 

265.00 

Check  Writer 

25.00 

File  Editing  Tools  (FET) 

65.00 

Screen  Dump/Repeat 

35.00 

Docu-Print 

20.00 

Scrunch 

25.00 

Sof-Bkup 

40.00 

Sorter  (Mach,  Language) 

35.00 

Trace-Print 

25.00 

Vari-Print 

25.00 

ASK  FOR  CATALOG  #80-C2  Dealers  Wanted 
Computer   House   Div.     1407   Clinton    Road 

Jackson,  Michigan     49202       (517)  782-2132 


by  Mark  Pelczarsfcl 
for  the  Apple  11 

Over  100  Hi-Res  colors! 

Drawing  program  includes  automatic  filling  and 
user-definable  "paintbrushes". 
The  finest  3-D  graphics  available,  capable  of 
color  and  multiple  figures  with  machine  language 
speed. 

Create  shape  tables  with  paddles  or  keystrokes. 
Hi-Res  text  anywhere  on  the  screen.  Define  your 
own  fonts. 

Thorough,  easy-to-use  manual  even  shows  how 
to  use  drawings  and  100  color  fill  routine  in 
your  own  programs. 

fron,C0:0PO 


^59 


95 


on  disk 

DOS  3.2  or  3.3,  requires  ApplesoR 
firmware  or  language  sy^'^ni. 

VISA  and  MasterCard  accepted 
Dealer  inquiries  Invited 

Apple  IHs  a  trademark  of  Apple  Computer.  Inc. 


software 

a  division  of  Micro  Co-op 


Post  ORlce  Box  432 

West  Chicago.  IL  601 85 

{312)231-0912 


WORKING 
OVERTIME 


APPLICATIONS  WHICH  SAVE  TIME 

Payroll,  Word  Processing,  Accounting  & 

Financial  Management,  Educational 

Administration,  Legal,  Medical  & 

Dental  Systems 

Check  your  Local  Dealer  or  Contact: 

Chorle/  fflonft  &  ft/zeciole/ 

7594  San  Remo  Trail 

Yucca  Valley,  Ca.  92284 

(714)  365-9718 


Apple  II 


TRS-80 


Tl  99/4 
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A  cure  for  Atari  BASIC 
or 

Make  Your 
Atari  A  Bit 
Wiser 

Charles  Brannon 

As  pointed  out  by  Glen  Fisher  and  Ron  Jeffries  in 
"The  Ouch  in  Atari  BASIC"  (COMPUTE!,  January/ 
February  1980),  the  keywords  AND  and  OR  in 
Atari  BASIC  do  not  let  you  "get  at"  the  individual 
bits  of  a  number,  as  Microsoft  BASIC  does.  Where 
PRINT  127  and  64  would  give  64  in  Microsoft 
BASIC,  the  Atari  interprets  the  command  as 
PRINT  (not  zero)  AND  (not  zero)  and  returns  "1". 
Although  this  is  fine  for  logical  comparisons  (e.g. 
IF  A=  12  and  B  =  22  THEN  PRINT  A$),  it  makes 
bit  hakcers  a  little  angry. 

If  you  do  not  appreciate  why,  let  me  explain. 
Besides  the  logical  uses  of  AND  and  OR,  it  is  often 
advantageous  to  use  these  operands  for  bit  manip- 
ulation. This  is  most  important  in  preparing  a  byte 
for  a  POKE  command,  or  interpreting  one  that 
was  read  with  PEEK.  Being  able  to  process  a 
number  on  the  binary  level  gives  more  "bite"  to  a 
computer's  number  crunching  abilities.  For  exam- 
ple, a  major  use  of  the  AND  operator  is  to  mask  a 
number,  that  is,  zeroing  out  some  of  the  bits  in  a 
number.  The  ASCII  value  of  "3"  is  51,  or  $33 
hexadecimal.  This  looks  like  %001 1001 1  in  binary. 
If  the  leftmost  four  bits  (the  left  nibble)  could  be 
cleared,  we  would  have  the  numerical  value  of  the 
character  "3".  The  action  takes  place  on  the  binary 
level. 


if  we  AND  with 
we  get 


51 
15 


00110011  binary 
GOOD  1 1 1 1 


0000  0011    =3  in  decimal 
Th^  AND  is  performed  bit  by  bit.  Refer  to  the  truth 

table  for  AND.  Therefore,  the  Microsoft  BASIC 
command  to  mask  the  left  four  bits  would  be: 
PRINT  51  and  15 

The  computer  would  respond  with  "3", 

The  OR  operator  is  commonly  used  to  force 
bits  into  a  byte.  For  example:  a  reverse  field  charac- 
ter is  specified  by  a  one  in  bit  seven  (the  leftmost 


one).  To  force  a  character  to  print  in  reverse  field, 
we  just  OR  its  ASCII  value  with  128. 

ASCC'A")  =  65  =     01000001  binary 

ifweORwith  1000000  (128) 

we  get  11000001   193 

(reverse  field  "A") 

Once  again,  refer  to  the  truth  table  for  OR  for 
details. 

One  other  very  useful  operand  is  EOR  (Exclu- 
sive OR).  Unfortunately,  virtually  no  BASIC  pro- 
vides this  function.  It  is  used  commonly  to  "flip  a 
bit",  that  is,  if  a  bit  is  exclusive  OR'd  with  a  one,  then 
the  opposite  bit  results.  If  a  number  is  exclusive 
OR'd  with  all  ones  (255),  then  the  complement  is 
formed. 


10101011     171 
11111111     255 


11000001      193  (reverse  "A") 

10000000     128 

01000001       65  (normal  "A") 


01010100  84 
Perhaps  now  you  can  see  why  these  operators  are  so 
useful.  But  why  am  I  tormenting  you?  Didn't  I  say 
that  Atari  BASIC  doesn't  have  this  capability?  Ah, 
too  true,  but  once  again  —  machine  language  comes 
to  the  rescue.  Listing  one  is  the  assembly  language 
program  that  will  simulate  the  bitwise  operators. 
(For  6502  programmers,  notice  the  sequence  CLC, 
BCC  OUT.  This  will  simulate  an  unconditional 
jump,  yet  the  code  remains  relocatable.)  Listing  two 
is  the  BASIC  program  that  will  load  the  program  in- 
to a  protected  area  of  memory.  At  least  1  think  it  is 
protected.  The  Atari  BASIC  Reference  Manual 
claims  that  the  area  from  $600  to  $6FF  is  FREE 
RAM.  If  true,  then  this  block  of  memory  could  be 
used  like  the  "second  cassette  buffer"  is  used  on  the 
PET.  When  the  machine  language  code  is  POKE'd 
here,  it  should  remain  there  until  I  he  power  is 
turned  off.  Listing  three  is  an  example  program 
showing  how  to  use  the  USR  command  to  call  the 
functions  from  your  programs.  It  assumes  that  list- 
ing two  has  already  been  run.  To  use  the  operators 
in  your  program,  first  load  the  .second  program.  If 
line  20  is  changed  to  RETURN  and  the  program  is 
appropriately  renumbered,  then  it  could  be  called 
as  a  subroutine  at  the  beginning  of  your  program. 
The  machine  language  program  is  called  by  the 
USR  function.  This  is  a  truly  remarkable  command 
on  the  Atari,  as  it  can  have  a  variable  length  hst  of 
arguments  for  the  machine  language  program  to 
deal  with.  This  machine  language  program  uses 
three  arguments.  The  format  is: 
A  =  USR(ML,avar  1  ,key,avar2) 

where  ML  is  the  starting  location  of  the  machine 
language  program  (1536),  avarl  is  the  first  argu- 
ment (value  0-255),  avar2  is  the  second  argument 
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Scott  Jldaws 


JUST  RELEASED 

,.«>      FOR  ATARI 

0.^    "SPECIAL  SAMPLER"  -  Never  tried  ADVENTURE?  This  special  Inexpensive 
sampler  complete  with  3  Treasures  is  a  cut-down  version  of  our  large 
Adventureland.    Guaranteed    to    supply    hours    of    enjoyment:    Try    an 
ADVENTURE  today! 
ATARI    ^W  TAPE  to  DISK*  051-0000     J  6.95 

l.^'  ADVENTURELAND  •  You  wander  through  an  encttanted  world  trying  to 
recover  the  13  lost  treasures.  You'll  encounter  wild  animals,  magical  beings, 
and  many  other  perils  and  puzzles.  Can  you  rescue  She  Blue  Ox  from  the 
quicksand?  Or  find  your  way  out  of  the  maze  of  pits?  Happy  Adventuring.... 
ATARI -Z4K  TAPE  to  DISK*  051-0001      $14.95 

2.y    PIRATE'S  ADVENTURE  -  "Yo  ho  ho  and  a  bottle  of  rum..."  You'll  meet  up  with 
the  pirate  and  his  daffy  bird  along  with  many  strange  sights  as  you  attempt  to 
go  from  your  London  flat  to  Treasure  Island.  Can  you  recover  Long  John 
Silver's  lost  treasures?  Happy  sailing,  matey, . .  . 
ATARI  •24K  TAPE  to  DISK*  051-0002     $14.95 

3.  MISSION  IMPOSSIBLE  ADVENTURE  ■  Good  morning,  your  mission  is  to...  and 
so  it  starts.  Vifill  you  be  able  to  complete  your  mission  on  time?  Or  is  the 
world's  first  automated  nuclear  reactor  doomed?  This  one's  weil  named.  It's 
hard,  there  is  no  magic,  but  plenty  of  suspense.  Good  luck.  .  .  . 

ATARI  •24K  TAPE  to  DISK*  051-0003     $14.95 

4.  VOODOO  CASTLE  ■  Count  Cristo  has  had  a  fiendish  curse  put  on  him  by  his 
enemies.  There  he  lies,  with  you  his  only  hope.  Will  you  be  able  to  rescue  him 
or  Is  he  forever  doomed?  Beware  the  Voodoo  man. ,  . . 

ATARI -24K  TAPE  10  DISK*  051-0004     $14.95 

5.  THE  COUNT  -  You  wake  up  in  a  large  brass  bed  in  a  castle  somewhere  in 
Transylvania.  Who  are  you,  what  are  you  doing  here,  and  WHY  did  the 
postman  deliver  a  bottle  of  blood?  You'll  love  this  ADVENTURE,  in  fact,  you 
might  say  it's  Love  at  First  Byte. .  .  . 

ATARI  ■24K  TAPE  to  DISK*  051-0005     $14.95 

6.  STRANGE  ODYSSEY  -  Marooned  at  the  edge  of  the  galaxy,  you've  stumbled 
on  the  ruins  of  an  ancient  alien  civilization  complete  with  fabulous  treasures 
and  unearthly  technologies.  Can  you  collect  the  treasures  and  return  or  will 
you  end  up  marooned  forever?- . . , 

ATARI  •  24K TAPE  (o  DISK*  051-0006     $14.95 

7.  MYSTERY  FUN  HOUSE  -  Can  you  find  your  way  completely  through  the 
strangest  Fun  House  in  existence,  or  will  you  always  be  kicked  out  when  the 
park  closes?.  -  .  . 

ATARI  •24K  TAPE  to  DISK*  051-0007     $14.95 

B.       PYRAMID  OF  DOOM  ■  Ah  Egyptian  Treasue  Hunt  leads  you  Into  the  dark 
recesses  of  a  recently  uncovered  Pyramid.  Will  you  recover  all  the  treasures  or 
more  likely  will  you  join  its  denizens  for  that  long  eternal  sleep?. .  .  . 
ATARI -24K  TAPE  to  DISK'  051-0008     $14.95 

9.       GHOST  TOWN  -  Explore  a  deserted  western  mining  town  in  search  of  13 
treasures.  From  rattlesnakes  to  runaway  horses,  this  ADVENTURE'S  got  Ihem 
all!  Just  remember,  Pardner,  they  don't  call  them  Ghost  Towns  for  nothin'. 
(Also  includes  new  bonus  scoring  system!) 
ATARI -24K  TAPE  to  DISK*  OS1-0009     $14.95 
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10. 


SAVAGE  ISLAND  —  PART  1  •  WARNING  FOR  EXPERIENCED 
ADVENTURERS  ONLY!  A  small  island  in  a  remote  ocean  holds  and  awesome 
secret.  Will  you  be  the  first  to  uncover  it?  NOTE:  This  is  the  first  of  a  larger 
multi-part  Adventure;,  it  will  be  necessary  to  purchase  additional  packages  to 
complete  the  entire  Adventure. 

ATARI -24K  TAPE  to  DISK*  051-0098     $14.95 

K- RECOMMENDED  FOR  THE  NOVICE  ADVENTURER,  with  miny  bulll-ln  hslpi 

'TAPE  to  DISK  -  a  standard  cassette  tape  that  njns  on  « tape  machine  or  can  easily 
be  transferred  to  disk. 


dventur^ 

INTERNATIONAL 

A  DIVISION  OF  SCOTT  ADAMS,  INC. 


CATALOG  &  ORDERING  TOLL  FREE  HOT  LINE  (800)  327-7172 

BOX  3435,  LONGWOOD,  FL  32750  ■  (305)  862-6917 


^^^ 


ADVENTURE  Series  also  available  for  TRS-80  Models  1,  2  &  3,  APPLE,  Pet  &  Scorcerer....Call  Todayt 
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Listing  1 

mei   .mmm 

BOOLEflH   FUNCTIONS 

3G02  ;****** 

FOR: 

THE   RTRRI 

8003  ; 

0064   WHICH 
0005   RRGl 

.I€ 
.HE 

rna             — 

fCB 

30G6    flF:G2 

.HE 

I^CF 

0007   RTH 

.HE 

f-M 

0063    ; 

8609 

.Eft 

f0000 

3G10 

.  OC 

0011    ; 

0000-     68 

0012    I  MIT 

PLft 

0001-    VS< 

03 

0613 

CMP 

#f03 

0093-  D0 

2C 

0014 

BNE 

OUT 

0005-   bS 

0013 

PLFI 

0006-    t.S 

0016 

I'Lfl 

0807-  85 

CI; 

9017 

3TH 

*flRGl 

0009-  SS 

0013 

[•■LR 

00Ofl-   6S 

0019 

F'Lfl 

000E-  35 

D0 

0020 

3Tfl 

*i'JHICH 

00011-    bS 

0021 

f-LR 

000E-   63 

0022 

PLR 

300F-  S5 

CF 

0023 
0024   ; 

STfl 

*hRG2 

0011-  ns 

D0 

0025 

LDR 

*WHICH 

0013-   C3 

01 

0026   flliD 

CUP 

#$01 

0015-  DQ 

07 

0027 

BUE 

OR 

0017-   R5 

i::E 

0023 

LDR 

*HRG1 

0013-   25 

i::F 

0029 

fli^n 

*HRG2 

00 IB-    IS 

0030 

CLC 

00 IC-   90 

13 

0031 

■-;i"<  ■■;■;•     ■ 

BCC 

OUT 

00 IE-   C9 

02 

0033   OR 

CMP 

#$02 

0026-   D0 

07 

y034 

BNE 

EOR: 

0022-   R5 

CB 

0035 

LDR 

*HRG1 

0024-  05 

CF 

0036 

ORR 

*flRG2 

0026-    13 

0037 

CLC 

0027-  yy 

BS 

0033 

BCC 

OUT 

0029-   C9 

03 

0040   EOR 

l:MP 

#$03 

S02B-   ri0 

04 

004 1 

BNE 

GUT 

00211-   H5 

C:E 

0042 

IDR 

*RRG1 

0Q2F-    45 

CF 

Rri4:-; 
0044    ; 

EOR 

*RRG2 

0031  ■     S5 

If4 

0045   OUT 

STfi 

*RTN 

0033-  fly 

00 

0046 

LDR 

#$00 

0035-   35 

B5 

6047 

STfl 

*RTN-;-l 

0057-    60 

0643 
0049 

RTS 
.EH 

LABEL    FILE: 

.  ■■■  -  e;;t£RNhl  ] 

.-■■WHICH=00Ii0 

.■•RRG1=00CE 

.'RRiIi 

2=00CF 

.-■■RTN=0OIi4 

j|JIT  =  000O 

HNII= 

0013 

OR=001E 

i:OR=0029 

OUT^ 

0031 

Listing  3 

100  REM  SflNFLE  PROGRhM 
il0  GRRPHICS  0:ML=1536 
J 20  SCR=PEEK';560>+256*PEEK(561  >+4 
130  SCR=PEEKC  SCR  ::'+256if PEEK  (SCR+1  > 
140  REM 

150  REM  DEMOHSTRRTE  "EOR" 
J  60  REM 

170  FOR  1=0  TO  131-.' 
1 S0  fi=USR  ( ML ..  F'EEK  <  3i::R+ 1  >  ..  3 . 1 23  > 
190  POKE  SCR-H..FI 
200  HEKT  I 
210  REM 

220  REM  DEMOHSTRRTE  "RHU"  &■.   "OR" 
230  REM 

240  OPEN  #1.-4.0..  "K:" 
250  GETttl..KEV 

260  PRINT  "MORMRL  CHflRRCTER:"J 
270  R=USR  i  ML .  REV .  1 ..  1 27  >  > 
280  PRINT  CHR-|:':;R> 
290  PRINT  "REVERSED  CHRRflCTER  :  " .: 
300  PR  I  NT  CHR*  ( USR  ■:;  ML ..  fl ..  2.- 123  ;:■ 
310  REM 

320  REM  TEST  EACH  FUNCTION 
330  REM 

340  GRRPHICS  8 

350  PRINT" 'CENTER  -1  TO  STOP>" 
360  PRINT  "FIRST  VALUE"; 
370  INPUT  RRGl 
380  IF  flRGl=-l  THEN  END 
390  PRINT  "EIJTER  FUNCTION-" 
400  PRINT  "1=RND..  2=0R..  3=EuR" 
410  INPUT  KEV 

420  IF  KEVCl  OR  KEV>3  THEN  390 
430  PRINT  "SECOND  VALUE".; 
440  INPUT  HRG2 

450  PR  I  NT  USR  <  ML ..  ARG 1 ..  KEV ..  HRG2  > 
460  PRINT: GOTO  350 
READY. 


.'.••■0000  .■  0033/  003  S 


Listing 2  10  ML=15.36:F0R  1=0  TO  55: READ  X  POKE  ML+I.-M^NEKT  I 

20  HEN 

30  DATR  1 04 ,  20 1 ..  3 .  20S ..  44 ..  1 04 ..  1 04 ..  1 33..  203 ..  1 04 ..  1 04 ..  1 33 .  203 ..  1 04 

40  DATA  1 04 ..  1 33 ..  207 ..  1 65 ,  20S  .201.1.  208  ..7.165.  203 .  37 .  207 ..  24 

50  DATA  144.19 . 20 1.2. 208 .7.1 65 . 203 . 5 . 207 .24.144. 8 . 20 1 

60  DATA  3. 20s. 4. 165.203.69.207. 133.212. 16y. 0.133. 213. 96 
RERDV. 
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of  the  function  to  be  performed,  and  key  is  the 
code  for  which  operator  is  being  used. 

1=AND 

2  =  OR 

3  =  EOR 

The  USR  function  MUST  supply  all  four  variables 
{ML,avarl,key,avar2)  and  in  proper  order  or  the 
Atari  will  "lock-up".  It  will  not  respond  to  the 
keyboard,  necessitating  a  power  off/on  reset  to 
regain  control. 

I  have  provided  here  a  machine  language 
program  that  extends  Atari  BASIC.  It  would  be 
very  useful  if  others  could  submit  similar  program- 
ming aids,  particularly  a  graphics  extension  to  use 
the  player/missile  graphics.  Let's  make  the  most  of 
the  USR  function  to  extend  Atari  BASIC  as  far  as 
possible. 
Truth  Tables 


0  AND  0  =  0 

0  AND  1  =  0 

1  AND  0  =  I 


0  OR  0  =  0 

0  OR  1  =  1 

1  OR  1  =  1 


0  EOR  0  =  0 
0  EOR  1  =  1 
1 EOR 1  =  0 


m 


^Aj 


Atari 
Owners 

who  need  support 


Send  for  your  FREE  Mosaic  Electronics 
software  catalog  today.  Includes  games, 
educational  programs,  utilities  and  more. 


I  have  an  Atari  400- 


AlariSOO. 


Please  send  me  your: 

D  8K  to  16K  RAM  expansion  kit  (S79.00) 

(My  check  is  enclosed) 
D  Software  Cataiog 


CITY. 


Send  to: 


Odds  And  Ends 

John  Girard 
Berkeley,  CA 

Here  is  an  early  routine  1  figured  out  for  the  ATA- 
RI that  encourages  people  to  play  with  the  many 
sound  possibilities. 

HYPER  DRIVE  SIMULATOR 

100  PRINT"TONE NUMBER"; 

INPUT T 
110  OPEN#1,4,0,"K:" 
120  GET#1,K 
130  FOR  I  =  200  TO  1  STEP 
140  SOUND  0,1,T,8 
150  F0RJ=1T0  5:NEXTJ 
160  NEXT  I 
170  SOUND  0,0,0,0 
180  GET#1,K 
190  FORI  =  lTO200 
200  SOUND  0,I,T,8 
210  NEXTl 
220  SOUND  0,0,0,0 
230  GOTO  120 

For  even  more  realistic  sounds,  the  volume  can  be 

made  to  rise  and  fall  with  the  pitch  of  the  engines: 

140  SOUND  0,I,T,15-INT(I*.05) 
200  SOUND  0,I,T,I5-INT(I*.075) 
delete  line  220 

Each  run  of  the  program  requests  T,  a  tone  number 
Giving  T  a  value  of  8  produces  a  satisfactory 
rushing  noise  for  the  engines.  Other  interesting 
values  are: 

10  —  a  pure  tone 
4  —  damaged  engine 

12  —  bizarre  sounding  engines 


SEE  BELOW 

PRESS  A  KEY  TO  START 

SPACESHIP  ACCELERATES 


KILL  SOUND  IN  HYPERSPACE 
PRESS  A  KEY  TO  FINISH 

SPACESHIP  DECELERATES 


ENGINES  OFF 


rilVkOSOIC 


ELECTRONICS 
P.O.  Box  748  {GO     Oregon  City.  0/egon  97045 
Mosaic  Elecrionics  ts  tn  no  w$y  aftshsted  yvtth  Aian. 


Software  for  the  Atarit 
SPELLBOUND_ 


Sl\ 


An  extremely  versaliJe.  ustr  un- 
entcd  program  for  dny  grade' 
level.  Cjn  be  usod  with  exii.tiny 
data  base,  user  created  datci.  or 
ddditional  dati)  cassettes. 
It  features: 


•  Learning  level  -  holds  a  word 
on  tfie  screen  for  you  to  study 
I  Test  le^'el  -  flashes  the  wofd  on 
Ihe  screen  for  you  to  speET 
•  Comes  with  a  dala  base  of  the 
most    frequently    misspelled 
words. 
Create  your  awn  data   l>ase. 
Store  the  words  on  cassette  for 
luture  use. 
•  Change  the  words  in  Ihe  data       j 
base  with  one  of  the  additiondl     , 
cassettes  that  are  available 


SPELLBOUND  DATA  TAf^S  fol 
low  a  pfionetic  sequence.  Tape 
"1  begins  with  short  voiAel.  three 
letter  words  and  progresses  to 
long  \owel  four  leUer  words.  The 
words  on  each  cassette  contrnue 
this  sequence.  All  words  in  this 
series  are  grouped  phonetically 
iind  by  grade  level  whetievef  pos- 
sible, All  DATA  cassettes  contain 
300  words 


SPELLBOUMD  $15.00 

(master    program   with    most 
fiuquentlv    misspelfed   woidsj 
B.AS1C  24K 
SB  DATA  TAPE  '  1     ,     f  5.00 
( stiori  vov,e]i  Jotig  vowels) 
SB  DATA  TAPE '2  -.     S5  00  , 
(short  vow-els  long  vowels 
blends) 
/  SB  DATA  TAPE  *3  .    .   S5  00 
Grades  2-4 i blends  hards 
soft  c) 

SB  DATA  TAPE  *4  55  00 

Grades  2 -4  (dipthongs 
/         homonyms) 
/  SB  DATA  TAPE  "5  . .     55.00 
{silent  letters,  endings/ 
compound  words) 
SB  DATA  TAPE  *6  . .  .   5500 
Grades  3  5  (more  dipthongs 
double  consonantsl 
SB  DATA  TAPE  '7  5500 

Grades  4-6  (compound  words 
endings) 
SB  DATA  TAPE  *e     ,  ,   S5.00 
Grades  A  6  ( words  not  covered 
m  previous  units) 
Aff  Datii  Tapes  Require 
The  Spelfbound  A^aster  Proqrai 


1CH.E.S.I.S. 

t>n  Bo<  •''7       -   ,, 


1>0  Boh  >'''_.„.,<. 


Garden  City 
^313)  5954722  to> 
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Editor's  Note:  Here  are  two  variations  of  screen  printers 
for  your  Atari.  Enjoy  them.  RCL 

Copy  Your 
Atari  Screen  To 
Your  Printer 

Harry  A  Straw 
Wilmington,  DE 

Here's  a  handy  routine  for  copying  text  from  your 
ATARI  screen  (GRAPHICS  0  mode)  to  your 
printer.  It  is  set  up  to  use  two  GOSUB  commands 
m  your  main  program: 

GOSUB  32010  to  initialize. 

GOSUB  32040  each  time  you  want  to  line-print  a  page 

displayed  on  your  screen. 

The  program  is  straightforward,  but  a  few  com- 
ments may  help  you  to  run  it  smoothly. 

The  main  business  of  this  program  is  the 
double  FOR-NEXT  loop  in  lines  32050-321 10. 
With  the  POSITION  command,  these  loops  move 
the  cursor  over  the  entire  screen,  one  position  at  a 
time.  At  each  cursor  position,  line  32080  GETs  the 
ASCII  number  for  the  character  under  the  cursor, 
and  hne  32090  puts  the  corresponding  character 
on  the  printer.  Since  I  have  an  80-column  printer 
and  the  ATARI  screen  is  only  40  characters  wide,  I 
need  line  32105  to  get  printer  carriage  return  at 
the  proper  place.  You  may  be  able  to  delete  this 
line  if  you  have  a  40-column  printer  (or  one  that 
can  be  set  to  40  columns). 

Line  32040  (printer  carriage  return)  makes 
sure  that  the  printer  head  starts  copying  at  its  left- 
hand  margin.  Line  32 1 20  "homes"  the  cursor  at 
the  end  of  the  subroutine.  This  is  not  always 
necessary  but,  depending  on  the  next  line  in  your 
main  program,  it  may  prevent  an  ERROR  -  141 , 
"cursor  out  of  range." 

You  miist  OPEN  a  port  to  GET  from  the 
screen.  I  use  port  no.  5,  leaving  ports  1-4  free  for 
use  in  main  programs.  The  initializing  subroutine 
in  lines  32010-32030  does  this.  It  also  expands  the 
ATARI  display  to  its  full  40-character  width  and 
24-line  height  to  match  the  cursor  movement 
controlled  by  lines  32050  and  32060.  The  OPEN 
command  clears  the  screen,  so  you  must  OPEN 
before  displaying  the  text  you  want  to  copy.  Just  be 
sure  your  main  program  says  GOSUB  32010  ahead 
of  the  screen  display  to  be  printed. 

If  you  have  only  a  few  lines  to  copy,  no  problem. 
Merely  adjust  line  32050  to  cover  the  rows  you 
want  to  scan.  Otherwise,  the  printer  will  run  for  all 
24  rows,  printing  a  lot  of  blank  spaces  wherever 
nothing  shows  on  the  screen. 


There  is  no  CLOSE  no.  5  statement  in  the 
listing.  This  leaves  port  no.  5  open  so  it  is  not 
necessary  to  repeat  GOSUB  32010  for  each  page 
to  be  line-printed. 

Take  advantage  of  ATARI'S  ability  to  merge 
cassette-recorded  programs  with  RAM-resident 
programs  by  recording  this  routine  with  ihe 
LIST"C  command  and  reading  the  cassei  le  with 
ENTER"C.  CSAVE  and  CLOAD  won't  work  this 
way.  In  fact,  CLOAD  erases  programs  in  RAM! 
This  routine  starts  with  a  high  line  number,  32000, 
so  its  line  numbers  won't  conflict  with  those  of  a 
program  already  in  RAM. 

In  a  future  note,  we'll  discuss  copying  graphics 
to  a  printer. 


32000 
32001 
32002 
32003 
32004 
32005 
32010 
32020 
32030 
32031 
32032 
32033 
3203A 
320A0 
32050 
32060 
32070 
32080 
32090 
32100 
32105 
32110 
32120 
32130 


COPY  SCREEN  TO  PRINTER, 


"OPEN"  CLEARS  SCREEN. 

DO  THIS  EARLY  IN  PROGRAM. 

USE  "GOSUB  32010"  FOR  THIS 


13,39 


REM 

REM 

REM 

REM 

REM 

REM 

POKE  82,0:POKE 

OPEN  //5,4,0,"S: 

RETURN 

REM 

REM  -  USE  GOSUB 

REM  -  TEXT  FROM 

REM 

LPRINT  CHRS(IO) 

FOR  Y=0  TO  23 

FOR  X=0  TO  39 

POSITION  X,Y 

GET  //5,G 

LPRINT  CHR$ (G) ; 

NEXT  X 

LPRINT  CHR$(13) 

NEXT  Y 

POSITION  0,0 

RETURN 


32040  TO 
SCREEN. 


LPRINT 


© 


Screen  To 
Printer 

Len  Lindsay 

Here  is  a  simple  program,  completely  in  B/\SIC  that 
will  print  what  is  on  your  screen  to  your  printer.  It  is 
designed  for  the  40  column  printer.  Thu.s  it  can  only 
print  39  character.s  per  line,  since  printing  ihe  40th 
character  creates  an  e.xtra  line  feed.  To  change  to  40 
characters  per  line  you  can  change  the  39  in  line 
32130  to  40. 
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Drawing  Tablet 

VersaWhter  operates  on  a  simple  principle, 
but  produces  graphics  which  match  or  exceed 
those  of  other  digitizers.  Its  rugged  yet 
precision  construction  makes  it  easy  to  use 
and  trouble  free.  Operation  is  mastered  in 
minutes.  It  plugs  directly  into  your  ATARI 
personal  computer. 


FOR  ATARI  PERSONAL  COMPUTERS 


Graphics  Software 

Easily  the  most  capable,  complete, 
and  usable  graphics  software  for 
ATARI  personal  computers  available. 
Designed  for  hobbyists,  but  engineers, 
artists,  doctors,  and  educators  are  also 
finding  exciting  ways  to  expand  their 
computer's  value  with  VersaWriter. 


UNIQUE  OFFER 

Send  us  YOUR  disk  and  $1.  We  will  promptly 
return  the  disk  with  a  slide  package  of  10  color 
pictures  drawn  with  VersaWriter. 


D     Enclosed  is  $1  and  my  disk. 
Send  me  the  slide  package. 

D     ATARI  n     APPLE  M 

D     Send  more  information  including 
VersaWriter  dealers  in  my  area. 

DEALER  INQUIRIES  INVITED. 


Versa  Computing,  Inc.    •    887  Conestoga  Circle    •    Newbury  Park,  CA  91320    •    (805)  498-1956 
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The  program  is  meant  to  be  used  as  a 
subroutine.  It  depends  on  these  two  lines  occuring  at 
the  beginning  of  the  program  first: 

20  DIM  XC$(39) 
40  OPEN  #3,4,0  "S:" 
Note  that  the  program  is  reading  characters  right  off 


the  screen.  Screen  input  of  this  type  can  be  used 
within  other  types  of  programs. 

Finally,  note  that  the  ATARI  printer  vail  not 
print  all  the  characters  as  on  your  screen.  Often  it 
will  just  print  a  blank  space  for  a  character  it  can't 
print. 


Listing 

0  REM  PRINT  SCREEN  TO  PRItfTER 

1  REM  CO  1980  LlhOSAV 
20  DIM  XC$<39) 

4e  OPEH  *3.4.8."S=" 

32100  XC«=" 

•'=RB1  PRIHT  SCREEH 

32101  REM  :>iC=CHARftCTER  READ  FROM  SCREEN 
AS  ASCII  UALIE 

32102  REM  XL0OF'=COL  LOOF"  UARIABLE 

32103  REM  YLOCiF'=ROW  LOOP  liARIABLE 

32104  REM  XC$=LIHE  OF  CHAF'ACTERS  FROM  SC 
REEH 

32105  REM  n  IHCLLDE  ft  DIM  JC$(39> 
32186  REM  :*■*  INCIUDE  TfCSE  AT  START 
32110  FOR  YLOOP=0  TO  23 

32120  POSITION  LYLOOP 

32130  FOR  XL00P=1  TO  39 

32140  GET  #3.XC 

32150  XC$(XLO0P.XL0OP>=CHR$<.XC) 

^160  NEXT  :>100P 

32170  LPRIHT  XC$ 

32180  NEXT  "flOOP 

32199  RETURN 


Sample  Output 

FILENAME 

003 

FILENAME 

005 

FILENAME 

068 

FILENAME 

009 

FILENAtlE 

001 

FILENAME 

001 

FILENAME 

023 

FILENAME 

001 

FILENAME 

001 

FILENAME 

005 

FILBIAME 

001 

SECTORS 


IS^   DIRPRINT.l 

:5ECT0RS 

IS^   DIRPRIHT.2 

:5ECT0R£; 

13^   DRFACTOR. 

SECTORS 

IS:   F-RINT.DRF 

:5ECT0RS; 

IS:   TEST.HST 

SECTiJRS 

IS:   DRFACTOR. HST 

:5ECT0RS 

IS:   MENU. 

SECTOfS 

IS:   F-REUHIi^H. 


IS:   LEW, HST 

:5ECT0RS 

IS:   :5i:reEN.F1^;T 

SECTOR":; 

IS:   F:tJBERT.H:5T 

iSECTiDR-S 

FFEE  =527 


Hardware 
Information 

Richard  Bills 
At  Last!    Lisle,  IL 

For  those  Atari  owners  who  have  been  tormented 
by  the  inadequacy  of  information  concerning  the 
hardware  and  other  technical  aspects,  relief  is 
finally  here.  Three  manuals  are  now  available: 

Atari  400/800  Technical  User  Notes  (C016555) 
Cost:  $27.00  plus  $3.00  shipping 
Includes  information  on  the  OS  and  other  hard- 
ware as  well  as  schematic  diagrams 

Atari  400/800  Operating  System  (OS)  (CA016557) 

Cost:  $17.00  plus  $3.00  shipping 

Includes  machine  language  routines  that  reside 

in  the  OS 

Atari  400/800  Disk  Operating  System  (DOS) 

(C016558) 
Cost:  $4.00  plus  $1.50  shipping 
Includes  machine  language  routines  that  are  used 
in  DOS 


Both  OS  and  DOS  can  be  ordered  for  $24.00 
(price  includes  shipping).  To  order  a  manual 
enclose  a  check  and  letter  stating  which  m  mual 
you  want  to: 

Atari  Inc. 
Customer  Support 

1346  Bordeaux  Drive 
Sunnyvale,  CA  94086 
Attn:  Tom  Harris 


ATARI  OWNERS!! 

HELP  is  here! 

HELP  is  a  program  that  will  give  statement  cioss- 
referencing,  program  renumbering,  string  searcn  and 
edit,  and  much  more.  A  manual  is  included  to  help 
you  learn  more  about  program  operation,  strinc;s,  and 
files.  Only  $34.95  through  April.  {S39.95  after^tliat.) 
Specify  CASSEHE  or  DISK  and  add  S2  for  S&LL 

Our  word  processor  will  be  available  in  Apri ,  too!! 
Write  or  call  for  details. 

Computer's  Voice 

2370  Ella,    Flint,  Ml    48504    Phone  (31 3>238-5585 
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3-DINENSIDNAL  GRAPHICS  PACKABEiAlloMi 
you  to  viw  Dbjictt  froi  AMY  locitlon 
in  tpici.U  Prsfnii!  h  on  caiiitti.t 
thi  rtit  in  thf  32  aigi  iinual!  Pict- 
igi  ii  diiignid  to  di  tutorial  on  thf 
hintlllng  of  gnphici  in  ATARI  BASIC! ' 


[ncludti  initructioni  on  gitting  flvt 
colon  up  in  thi  HI-it£S  fodi!  All  thi  „„  _ 
littingi  art  glvtnlOWLY  «?.Wt.9»thttii.aA- 


*=i"r*=*Fi3: 

FROHi 

454    Branita 


SEBREE'S    COHPUTIN6 

Av. ,     MonroviapCA    91016 


3-D  RED  BARON  DOaFieKT/FLT.SINULATM!  .^ 

Oni  of  our  btit  wiling  gun!  All  of- ~::^~-^5?T^ 

the  graphici  art  dont  in    HI-fiE8  tlth—^"   ^  I     \  ~ 
HULTI-ciOfiS!!  Sound  Efftcti!  Sriphic         ^■'         I       \ 
nploiiont,  RADAfl,ALniETER,i  griphiif 
Korolioard!  Frawi  vary  froa  6  cvd*'  - 
ptr  iKond  to  2.2S  ptr  ik. UPDATED  » 


1^ 


Software  for 
Personal  Computers 


am  THE  TREMCH!  Anothir  but  ullw!  ""-^^^ 

2  progrui,3  vfriioni.HI-RES  m/wUI- 
CDlori.lt  Ion  RES.Fiit  iction  firaihici 
uploiloni,  found  tfftcti,  iniutioii! 
Ii  NOT  thi  UM  u  vtrilon  publiihid 
In  SDFT3ll>E(ti).Kuch  iiptndMJ  progrii 
Ht.  Ktny  optloni  and  playing  tcmti 
incIudHi.REB.Jvitk.B)tt.Y^tli.95t.Woth 


=^' 


,  HETXHmi  e«i»fT  la  ai\ftf^ 


X 


TRS-SO 

ftWUS  ADVENTURE .' 
■inufl  with 


DjjULUQjli 

AlHifOfll 


POCKET 

Play  our  vtr 
itijiflj_Si 


COMPUTER    80FTHARE 
popular  progrM  on  your  P.C.  Hith  A  1 


Play  our  vtrv  popular  proorM  on  your  P.C.  iitn  A  i 
^»)>»»»>llritt  for  a  friiTiUWaf  ioftMrnadayi)<<<<<<<<<<<<4 


atrt  ava 


A  collection  of  10  chollengjrg  programs  created  to  provide  o  untqu* 
enterlainment  value  —  and  2  personol/bujineis  progrotnv  v/ith  brood 
fur^ctiorial    volue.    In   disk  ord/O'    cassette  as   indicated. 


GAMES        •    HEtlCOPTER  BATTIE  fi.q 

•  HORSE  RACING  Req 

•  KENO  Beq, 

•  IIGHTNING   EOITS  Req 
and    REACTION 

•  THE  MAD  MARBIE  Req 

•  MUSIOAME  (3  Gomes)  Reo 


•  SUPERMAStER 

•  TAG 

•  TRACTOR   BEAM 

•  WAR   AT  SEA 


Req 
Req 
Req 
Req 


.  16K 
.  I6K 
.  I6K 
-16IC 
8K 

-  16K 

-  16K 
-2JIC 

-  8K 

-  16K 

-  16K 

-  24K 

-  BK 

-  liK 

-  14K 

-  liK 

-  8K 
-16K 

-  16K 
-24K 


RAM/Cojselle 

RAM/Oisk 

RAM/Cojiette 

RAM /Disk 

RAM'Cosielle 

RAM  Disk 

RAM^Cossette 

RAM  'Disk 

RAM 'Cassette 

RAM/Oisk 

RAM/Cossetle 

RAM 'Disk 

SAM/Cosselle 

RAM/Dill 

RAM/Cassette 

RAM'Disk 

RAH/Cosielie 

RAM'Disk 

RAM  'Cassette 

RAM/Disk 


BUSINESS   •   CCA   Data 

Management   S^rste 
•    LETTER  WRITER 


Seq.  -  48K   RAM  'DUk 
Req.  -54K   RAM'Disk 
Mastercard   &  VISA   Accepted 


i  9.95 
U.95 

9.9J 
U.9i 

9.95 
14.95 

9.95 
14.95 

9.95 
14.95 

9.95 
!4,9i 

9.95 
14.95 

9.95 
14.95 

9.95 
14.95 
14.95 
19,93 

99.95 
19.95 


DIVISION  OF  CUSTOM  EIECIRONICS.  INC. 

SOFTWARE. 


.Ji^ 


238  Exchonge  St..  Chkopee,  Moiiachuielti  01D13 
1413)   592-4?61 
*    Dealer  Anci  Distributor   Inquiries   InvitecJ 
Closed  Mondoys  —Open  Dally  'Til  3;30  —  Fridoyi  'Til  8 


ATARI' 

400*&  800* 


Computer   Software 
HORSEWORD  DERBYtm 

tPlayer  against  the  computer 

tAction  grapfiics 

tAlttacIive  colors  and  sounds  $4  Q05 

tFour  levels  ol  play  I  nM 

AVOID     "THE  BEST  PLAYER  WINS" 

1  or  2  Player  ACTION  SPACE  GAME 
tGreat  color,  sound,  graptiic  combination 
t5  play  variations 
JKeep  ship  in  quadrant  while  Irying  lo  J*  Q95 

blast  everyone  (including  opponent)  I  51 

TRIBOMB      ACTION  GAME 

t1  or  2  player  game,,  just  try  to  beat  J*  ||05 

Ihecompuler    5  levels  of  play  Iw 

■ATARI  .REGISTERED  TRADEMARK  OF  ATARI,  INC. 
ALL  ATARI  2600,  800  &  400  CARTRIDGES  & 
SOFTWARE,  HARDWARE,  JOYSTICKS, 
PADDLES  ETC.  SEND  FOR  GATALOG- 

'ReQUlrts  1 6K  RAM       uo  slh  swPfiNG 


COMPUTER  MAGIC  LTD. 

176  Main  St.  Port  Washington, N.Y.,11050 

L  Dealer  Inquiries 

516  883-0094 


DRAG    IS    BACK 

[by      Ted      C/owges) 

An  advenfure  game  to  fesf  your  logic  ond  your  tendency 
towards  greed.   Battle  monsters,  werewolves,  vampires, 
speeding   demons,  the  crafty  Igor  and  of  course  the  Lord 
of  Evtl...Drac.   How  much  gold  can  you    escape    witti  ? 
How  much  will  you  spend  to  stoy  alive  ?  Your    instincts 
could    be   wrong,   fnon -scrolling).        ©1981 

24K       Atari®  800  "■"■        cosseffe   only    SI4.95 


SYf/C/>0,  INC.     SOFTWARE    DIVISION 

31332    VIA    COLINAS  VISA   AND  MASTERCAUD    ACCEPTED 

SUITE    lOT  CALIF.     RESIOEHTS   PLEASE  ADD   6% 

WESTLAKE     VILLAGE.  CALIF.    9liS£  SALES     TAX.     SI.OO     SHIPPINS. 
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Using  Strings 
For  Graphics 
Storage 

Michael  Boom 
Spokene,  WA 

If  you've  ever  been  frustrated  attempting  to  PLOT 
and  DRAWTO  your  way  through  a  complex 
pattern  or  design  in  Atari  Graphics,  you  might 
appreciate  a  method  of  graphics  generation  using 
text  strings  to  store  pixel  data.  While  this  string 
method  is  not  simpler  to  use  in  all  cases,  its  ease  of 
data  entry  and  manipulation  possibilities  make  it  a 
strong  graphics  tool. 

Simple  line  drawings  over  large  areas  of  the 
screen  are  best  done  using  PLOT  and  DRAWTO 
commands,  since  this  method  uses  less  memory 
and  generates  images  faster  than  the  string  method 
will.  However,  if  you  have  a  very  complex  pattern 
in  a  small  area  of  the  screen,  the  string  method 
works  well.  The  heart  of  string  graphics  lies  in  the 
fact  that  if  you  run  a  PRINT  #6  statement  followed 
by  ASCII  characters  while  in  Graphics  Modes  3-7, 
colored  pixels  will  appear  on  the  screen.  Different 
letters  and  symbols  will  plot  different  colors,  but 
for  our  purpose  we  will  deal  only  with  the  letters 
A,  B,  C,  and  D.  Each  of  these  letters  plots  a  different 
colored  pixel  in  Graphics  modes  3,  5,  and  7: 

A  plots  color  1   (color  register  #0) 

B  plots  color  2  (color  register  #1 

C  plots  color  3  (color  register  #2) 

D  plots  color  0  (color  register  #4) 

In  Graphics  modes  4  and  6,  only  the  letters  A  and 
B  need  be  used,  A  for  the  plotting  color,  B  for  the 
background  color. 

For  a  demonstration,  if  you  type  the  command 

GRAPHICS  3:  PRINT  #6;  "ABCDA" 
moves  the  pixel  string  down  and  to  the  right. 

Creoting  A  Graphics  String: 

We  can  now  use  the  above  methods  to  plot  a 
pattern.  First  graph  out  the  area  needed  for  the 
pattern,  then  fill  in  the  pattern  using  "A",  "B",  "C", 
and  "D"  to  represent  the  colors  wanted; 

String  1  CDDDDAAAAA 

String  2  DCDDDDDDAA 

String  3  DDCDDDDADA 

String  4  DDDCDDADDA 

String  5  DDDDCADDDA 

String  6  AAAAACDDDD 

String  7  ABBBADCDDD 

String  8  ABCBADDCDD 

String  9  ABBBADDDCD 

String  10  AAAAACCCCC 


Now  break  down  the  graph  as  a  series  of  strings,  in 
this  case  10  strings  of  10  characters  each: 

String  1  is  "CDDDDAAAAA" 
String  2  in  "DCDDDDDDAA" 
etc. 

Concatenate  the  10  strings  for  more  efficient  data 
storage: 

"CDDDDAAAAADCDDDDDDAADDCDD13DADADD 
DCDDADDADDDDCADDDAAAAAACDDDDABB 
BADCDDDABCBADDCDDABBBADDDCDAAAA 
ACCCCC" 

We  have  now  generated  all  the  data  nece  ssary  to 
plot  our  figure  {a  square  with  an  arrow)  m  the 
graphics  mode,  and  have  stored  it  in  one  long 
string 

Display 

To  plot  the  string  on  the  screen,  determine  where 
you  would  like  the  upper  left  hand  corner  of  the 
figure  to  be  located,  and  enter  it  during  i  he  run  of 
the  following  program  after  prompt  "X,Y?" 

10     GRAPHICS  5 

20     DIM  A$(100) 

30  $  =  "CDDDDAAAAADCDDDDDDAADDCDDDD 
ADADDDCDDADDADDDDCADDDAAAAAA 
CDDCDDDABCBADDCDDABBBADDDCDAA 
AA ACCCCC" 

40     PRINT  "X,Y";:INPUTX,Y 

80     FOR  K=  1  TO  10 

90     POSITION  X, Y  +  K  - 1 

1 00  PRINT  #6;  A$(K*  1 0-9,K*  1 0) 

110  NEXTK 

In  this  program,  lines  20  and  30  set  up  our  main 
pixel  data  string  and  line  40  establishes  the  upper 
left  corner  coordinates  of  the  figure.  Lines  80  and 
1 10  set  up  a  loop  of  10  steps,  to  divide  our  main 
data  string  into  7  rows.  Line  90  positions  the  cursor 
for  each  row,  and  line  100  prints  10  consecutive  10 
character  strings  on  the  screen. 

Obviously  there  are  figures  which  require 
strings  too  long  for  direct  entry  in  Atari  Basic.  In 
that  case,  divide  the  figure  into  several  rectangular 
sections,  each  small  enough  for  inclusion  into  one 
string  (usually  under  100  characters  in  length.) 
Then  concatenate  the  string  as  explained  in  the 
Basic  Reference  Manual,  p.  39. 

Figure  Manipulation: 

Plotdng  a  figure  using  strinng  graphics  is  fairly 
simple  and  straightforward.  Its  real  strength  lies  in 
figure  manipulation  through  string  reading.  Some 
easy  manipulations  are: 

1.  Figure  rotation  (in  90°  implements) 

2.  Figure  inversion 

3.  Color  changes 

For  figure  rotation,  using  the  same  example  figure 
and  data  string,  let's  substitute  and  add  to  the 
previous  program.  For  a  90  degree  turn  i^lockwise, 
add  and  substitute: 


May.  1981,  Issue  12. 


COMPUTE! 


83 


SOFTWARE  FOR  THE  ATARI  800 
AND  THE  ATARI  400* 


TARI  TREK'" 

By  Fabio  Ehrengruber 

Gel  ready  for  an  eiciling  trek  through  space.  Your 
mission  is  to  rid  Itre  galaty  ol  Klingon  warships,  and  lo 
accomplish  this  you  must  use  strategy  to  guide  the  star- 
ship  Enterprise  around  stars,  through  space  storms,  and 
amidst  enemy  fire.  Sound  and  color  enliven  this  action- 
packed  version  of  the  traditional  trek  game.  Nine  levels  of 
play  allow  the  player  to  make  the  mission  as  easy  or  as 
challenging  as  he  wishes.  At  the  highest  level  you  are  also 
playing  against  time.  Damage  to  your  ship  can  be 
repaired  in  space  at  a  cost  of  time  and  resources  if  you 
can't  make  it  back  to  base.  TARI  TREK  gives  you  a  lot  of 
trek  at  a  low  price.  This  program  is  written  entirely  m 
BASIC  and  requires  at  least  2'IK  of  user  memory  For  the 
Atari  800  only. 

Cassette  -  S11.95        Diskette  -  S14.9S 


FASTGAMMON" 

By  Bob  Christiansen 

P)ay  backgammon  against  a  talented  computer  oppo 
nent  This  is  the  latest  and  best  version  of  the  most  popu- 
backgammon-playing  program  for  personal  computers  ■ 
FASTGAMMON  Roll  your  own  dice  or  let  Ihecomputer  roll 
them  for  you.  Ad|ust  the  display  speed  to  be  fast  or  slow. 
If  you  wish  you  can  play  a  game  using  the  same  dice  rolls 
as  the  previous  game  -  a  great  aid  in  improving  your  skills 
at  backgammon.  Beginners  find  it  easy  to  learn  backgam- 
mon by  playing  against  the  computer,  and  even  very 
good  players  find  it  a  challenge  to  beat  FASTGAMMON. 
The  12-page  instruction  booklet  includes  the  rules  of  the 
game.  Written  in  machine  Isnguage.  Requires  only  SK  of 
RAIyl  and  runs  on  both  the  Atari  400  and  the  Atari  800. 

On  cassette  only  -  J19.95 


TAISK  TRAP 

By  Don  Ursem 

A  rampaging  tank  tries  lo  run  you  down.  You  are  a  combat 
engineer,  buifding  concrete  barriers  in  an  effort  to  con- 
larn  the  tank.  Use  either  the  keyboard  or  an  Atari  loystick 
to  move  your  man  and  build  walls.  If  you  trap  the  tank  you 
will  be  awarded  a  rank  based  on  the  amount  of  time  and 
concrete  you  used  up.  Bulthey'll  be  playing  taps  for  you 
if  you  gel  run  over.  There  are  four  levels  oTplay.  Higher 
levels  of  play  introduce  slow  curing  concrete,  citizens  to 
protect,  and  the  ability  of  ttie  tank  to  shoot  through  any 
wall  unless  you  stay  close  by.  Music,  color,  and  sound  ef- 
fects add  to  the  excitement.  Written  in  BASIC  with  ma- 
chine language  su  broulines.  Requires  at  least  16K  of  user 
memory,RunsontheAtariaOOandonanAtari400with 
16K  RAM. 

Cassette    $11.95        Diskette  -  m.95 


QS  FORTH'-  By  James  Albanese.  Step  into  the  world  of  the  remarkable  FORTH  programming  language.  Writing  programs  in  FORTH  is  much  easier  than  writing  them  in  as- 
semibly  language  yet  FORTH  programs  run  almost  as  fast  as  machine  code  and  many  times  faster  than  BASIC  programs.  QS  FORTH  is  based  on  lig-FORTH,  the  popular  mode! 
from  the  FORTH  Interest  Group  that  has  become  a  standard  fof  microcomputers,  QS  FORTH  is  a  disk-based  system  that  can  be  used  with  up  to  four  disk  drives.  There  are  five 
modules  included: 

1.  The  FORTH  KERNEL  (The  standard  hg-FORTH  model  customized  to  run  on  the  Atari  coraputerl. 

2.  An  EXTENSION  to  the  basic  vocabulary  that  contains  some  handy  additional  words. 
3-  An  EDITOR  that  allows  editing  source  programs  [screens)  using  Atari  type  editing. 

4.  An  lOCB  module  that  makes  I/O  operations  easy  to  set  up, 

5.  An  ASSEMBLER  that  allows  defining  FORTH  words  as  a  series  of  6502  assembly  language  instructions. 

Modules  2-5  may  not  have  to  be  loaded  with  the  user's  application  program,  allowing  lor  some  efficiencies  in  program  overhead.  Full  error  statements  (not  just  numerical 
codesi  are  printed  ouL  including  most  disk  error  statements.  QS  FORTH  requires  at  least  24K  of  RAM  and  at  least  one  disk  drive.  For  the  Atari  800  only. 

On  diskette  only-  J79.95 

ASSEMBLER  by  Gary  Shannon.  Write  your  own  6502  machine  language  programs  with  this  inexpensive  in-RAM  editor/assembler.  Use  the  editor  to  create  and  edit  your 
assembler  source  code.  Then  use  the  assembler  to  translate  the  source  code  into  machine  language  instructions  and  store  the  code  in  memory.  Simple  commands  allow  you 
to  save  and  load  the  source  code  to  and  from  cassette  tape.  You  can  also  saveany  part  of  memory  on  tape  and  load  it  back  into  RAM  at  the  same  or  at  a  different  location.  I  he 
assembler  handles  all  6502  mnemonics  plus  12  pseudo  ops  that  include  video  and  printer  control.  Commenbng  Is  allowed  and  error  checking  is  performed.  A  very  useful 
feature  allows  you  to  view  and  modify  hexadecimal  code  anywhere  in  memory.  Instructions  on  how  to  interface  machine  language  subroutines  to  your  BASIC  programs  are 
included.  ASSEMBLER  requires  16K  of  user  memofy  and  runs  on  both  the  Atari  800  and  the  Atari  400. 

On  cassette  only  ■  $24.95 
********* 

6502  DISASSEMBLER  by  Bob  Pierce  This  neat  8K  BASIC  program  allows  you  to  disassemble  machine  code,  translating  it  and  listing  it  in  assembly  language  format  on 
the  video  and  on  the  printer  if  you  have  one.  6502  DISASSEMBLER  can  be  used  to  disassemble  the  operating  system  ROM.  the  BASIC  carfridge.and  machine  language  pro- 
grams located  anywhere  in  RAM  eicept  where  the  DISASSEMBLER  itself  resides,  (Host  Atari  cartridges  are  protected  and  cannot  be  disassembled  using  this  disassemblerj 
Also  works  as  an  ASCII  interpreter,  translating  machine  code  into  ASCII  characters,  6502  DISASSEMBLER  requires  only  8K  of  user  memory  and  runs  on  both  the  Alan  800 
and  the  Atari  400, 

Cassette- $11.95        Diskette  -  $14.95 


QUTILiry  SOFTW71R6 

6660  l^eseda  Blvd   Suite  105,  Reseda,  CA  91335 


(213)  344-^i599 


'Indicates  trademarks  ol  Atari,  Inc. 


WHERETD  GET  IT:  Call  us  at  (2131 344-6599  for  the  nameol  the  Quality  Software  dealer  nearest 
you  if  necessary  you  may  orOer  directly  fromus  Mastercard  and  Visa  cardholders  may  place  or- 
ders by  telEofione  Oi  mail  your  ctiecl*  or  bankcard  number  lo  Quality  Soltwaie,  6660  Reseda 
BIyd,,  Suite  105,  Reseda,  CA  91335  Calilorma  resitjenis  add  6%  salesla«  SHIPPING  CHARGES: 
V^ilhin  Norlh  America  orders  must  include  $1.50  loi  lirsi  class  shipping  and  handlinj.  Outside 
North  America  the  ctiarge  for  airmail  shipping  and  handling  is  $5.00.  Pay  in  U.S.  currency. 
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20  DIM  A$(100),B$(I00) 

50  FOR  K  =  1  TO  10:  FOR  L  =  1  TO  10 

60  B$(K*10-10  +  L,K*  1 0-10  +  L)  =  A$((10-L)*10  +  K, 

(10-L}*10  +  K) 
70  NEXT  L,  NEXT  K 
100  PRINT #6;B$(K*I0-9,K*10) 

For  a  270  degree  clockwise  rotation,  substitute: 

60  B$(K*10-I0  +  L,K*10-10+1)  +  A$(L*10+1-K,L* 
10+1-K 

For  a  180  degree  clockwise  rotation,  substitute 

50  FOR  K  =  1  TO  100 

60  B$(K,K)  =  A$(101-K,101-K) 

70  NEXTK 

To  change  color  assignments,  add  and  substitute  to 
the  original  program: 

50  FORK=l  tolOO 

60  IF  A$(K,K)  =  "C"  THEN  A$(K,K)  =  "A" 

70  NEXTK 

To  invert  a  figure,  substitute  to  the  original 
program : 

100  PRINT  #6;  A$((  1 1-K)*  1 0-9,(  1 1-K)*  1 0) 

To  turn  a  figure  left  to  right,  substitute  in  the  180 
degree  rotation  program: 

100  PRINT  #6;  B$((l  1-K*  10-9,(1 1-K)*  10) 

The  string  manipulations  used  to  manipulate  this 
10x10  figure  can  easily  be  incorporated  into 
subroutines  for  use  in  programs  using  repetitive 
figures  in  different  positions.  Further  experimen- 
tation for  more  possibihties  is  definitely  in  order. 
I  hope  that  the  method  of  string  graphics  is 
handy  and  useful  for  those  of  you  interested  in 
Atari  graphics.  Good  luck  with  them.  ^ 


Atari  Machine 
I/O 

Charles  Brannon 

There  are  three  routines  that  will  be  of  interest  to 
ATARI  machine  language  programmers. 

Location  $F6E2  waits  for  a  key  to  be  pressed, 
and  will  return  its  ASCII  value  in  the  accumulator. 
(Works  like  GET#  in  BASIC) 

Location  $F6A4  puts  the  character  in  the 
accumulator  on  the  screen  in  the  next  print  location. 
{Works  like  PUT#6)  The  X  and  Y  registers  are 
altered  by  this  routine. 

The  INPUT  routine  at  $F63E  is  a  little  trickier. 
It  will  input  a  line  from  the  screen  and  keyboard, 
just  like  the  INPUT  statement  does  in  BASIC.  It 
does  not  store  the  line  anywhere,  however.  To  use 
it,  do  a  JSR  $F63E  to  get  each  character  of  the  line. 
The  character  will  be  returned  in  the  accumulator. 
Check  for  end  of  input  by  comparing  the  value  to 


155,  the  ATASCII  value  of  the  RETURN  key.  You 
must  store  the  values  in  memory  to  save  the  input. 
Since  the  X  and  Y  registers  are  altered  by  this 
routine,  you  have  to  save  them  if  you  are  using 
them  before  you  call  the  routine.  The  program  at 
the  end  of  this  article  demonstrates  this. 

Quick  Reference 
GETCHAR      $F6E2 
OUTCHAR     $F6A4 
INPUT  $F63E 

Finally,  1  warn  you  that  although  these  ad- 
dresses work  on  my  ATARI,  they  might  be  different 
on  yours. 


INPUT 

LDX#0 

;initialize  loop  countei 

NEXT 

STX  SAVEX 

;save  it 

JSR   $F63E 

;getachaiactei 

LDX  SAVEX 

;iesto>e  index 

STA  STRINCX 

;savechaiactei 

INX 

;in  cement  count  ei 

CMP#9B 

;is  accuinulato>  =  1 5:> 
(RETURN)? 

BNE  NEXT 

;  if  not,  continue 

RTS 

;  Finished 

OUTPUT  LDX  #0 

;initialize  loop  count  ei 

NXT 

STX  SAVEX 

;save  it 

LDA  STRING.X 

;fetch  a  chai  acte>  h  om  metnoi  y 

JSR   $F6A4 

;  punt  it 

LDX  SAVEX 

;>estoie  index 

INX 

;inc3etnentit 

CMP#$9B 

;accuniulatO)=  155  (RETURN)? 

BNE  NXT 

;if  not,  continue 

RTS 

;Finislied                                        jr 

ATARI    OWNERS 

f^lf^ni™        DEALERS 

PROGRAMMERS 

MASTER  MEMORY  MAP  —  Lists  almost  every  memory 
location  that  you  might  need  with  examples  of  what 
to  poke  or  peek  and  what  results  necessary  for 
beginning  and  advanced  Atari  owners.  $5.95. 

TRICKY  TUTORIAL  TAPES  —  Do  your  programs  all  look 
alike?  This  series  of  self  teaching  tutorials  will  first 
show  you  what  your  machine  can  do,  then  take  you 
step  by  step  through  the  code  itself.  All  ct  these 
"tricks"  can  easily  be  used  by  basic  or  advanced 
programmers.  Excellent  as  Dealer  Demos. 

TTT#1  —  DISPLAY  LISTS:  Break  up  your 
screen  into  3,  5,  even  10  different  modes 
of  graphics  and  text  at  the  same  time. 

TTT#2  -  HORIZONTAL/VERTICAL 
SCROLLII^G:  Move  the  information  on  the 
screen  up,  down,  or  sideways. 
TTT#3  —  PAGE  FLIPPING:  Instantly 
display  a  new  screen  of  graphics  or  text 
by  the  press  of  a  button, 
TTT#4  —  BASICS  OF  ANIMATION:  For 
games  or  business  presentation;;, 
animated  figures  or  graphs  are  very  im- 
pressive. Similar  to  techniques  used  in 
star  raiders. T(^ 

TTT#5  —  LIGHT  PEN  PROGRAMS:  Some 
single  programs  for  use  with  ihe  new  light 
pen. 

Each  program  takes  a  few  hours  to  completely  learn, 
includes  full  documentation,  and  costs: 

$14.95  Tape  or  Disk!  Any  3  for  $39.35 

ORDER  TODAY  OR  SEND  FOR  OUR  COMPLETE  CATALOG 

SANTA  CRUZ  SOFTWARE 
5425  Jigger  Drive,  Soquel,  CA  95073 
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SOFTWARE 

FOR 

ATARI 

1     y  V 

\sWirTY    SOFTWARE,  INCj 

HOME  MANAGEMENT 

HLEIT  by  Jerry  White.  A  Database  System.  (Jse  this  no-nonsense  electronic 
cataloguing  system  to  create,  add,  delete,  edit,  print,  store  and  sort  different 
Idnds  of  custom  files.  For  every  need  around  your  home.  Disk  Package  runs 
or  24K  and  up.  *34.95  disk  only. 

PROGI^AMMING  AIDS 

BASIC  REIHUMBER  by  Fernando  Herrera.  Change  lines,  references,  even 
variables!!  Includes  BCD  converter  and  BASIC  PROGRAM  DECODER. 
SI 4.95  cassette;  SI 9.95  disk. 

CHALLENGE  &  FON 

SPACE  CHASE  by  Fernando  Herrera.  Conquer  the  Galaxy ...  if  you  can 

escape  the  deadly  chase  of  the  patrol  fleet  4  levels. 

TIME  BOMB  by  Fernando  Herrera.  Beat  the  clock  in  a  Mine  Field.  5  levels  — 

any  number  of  players  —  scoreboard  lists  top  players. 

MINDTRACE  by  Lee  Jacknow.  If  you  like  Simon  you  will  love  this  challenge 

...  a  real  test  for  your  memory. 

DOTS-M-BOXES  by  Lee  Jacknow.  You  played  it  as  a  kid  ...  it's  better  on  a 

computer. 

Games  on  cassette;  $14.95  each 

Add  S5  to  total  if  retjuesting  disk 

EDUCATIONAL 

MY  RRST  ALPHABET  by  Fernando  Herrera.  Before  you  send  your  kid  to 
school  he  or  she  will  know  all  the  letters,  numbers,  musical  tunes,  animals ... 
even  typing  and  how  to  run  a  program!!  Program  allows  parents  to  use  built- 
in  drawings  or  to  design  their  own.  $29.95  disk  only. 

TO  ORDER  SEMD  CHECK  OR  MOMEY  ORDER  TO: 

SWIFTY  SOFl  WARE,  INC. 

P.O.  BOX  641 

MELVlLXJE.ti.Y.  11747 

(516)549-9141 

Atari  is  a  Irademaik  of  Atari.  Inc.  ■  N.Y.  RESlDEffTS  ADD  7%  SALES  TAX 

ATARI 


C 


SOFTWARE 

by 

OMPUGRAPHICS 

USER  BALL-flction  game  of  lap-or-be-zippedl 


PILLBQX-Destroy  the  enewy  with  tnortar  nii sales! 
SPftCE  BflSE-Protect  your  space  station  fro*  aliens! 

ftl  I  require  a<.  2  Joysticks 

On  Cassette  Only  $5.95  Each  !ll 

(flZ  Residents  add  5i  tax) 

SEND  CASH,  OCCK  DR  M.Q.  TO: 

COMPUGRflPrilCS 
i3ffi8  N.  19th  Ave  Suite  *228 
Phoenix.flZ     85023      CGi32)-863-lB95 
Atari  is  a  tradewark  of  flTftRI.Inc. 


TH REE- BASE    CALCULATOR     -    $12.95 

Hexadedmal,  Decimal,  Octol.      Reverse    Polish 

AUDIBLe    DISASSEMBLER        -       $9.95 

Op-code  generates   a  'one.     Decimal      Hexadecimol, 

DECISION    MAKER    -  $8.95 

Aids  In  evaloQt  I  on    of    complex    decisions. 


1  r 


Color 

Computer 
I      Concepts 


ATARI  is  a   Irademork    ot 
ATARI,  INC. 

P.O.  BOX    1206 

KENT.  WA  98031 


ADVENTURE 

for  your 
ATARI  400/800 

uq1.*i  the  quest 

Mt  and  now,   after  the  final  battle, 
the  reiTviants  of  humankind  manage  to 

survive  in  small  bands  scattered 

around  the  globe.     Chaos  and  savagery 

reign  supreme  on  the  devastated  planet. 

Can  you  discover  the  awesome  secret 

that  will  save  Earths  dwindling 

populace  from  a  fate  worse  than  death? 

As  you  progress  thru  the  more  than  60 

locations  in  this  adventure,  you 

encounter  obstacles  and  aidsi 

loathsome  beasts  and  helpful  strangers. 

But  beware,   one  false  move  could 
mean  doom  both  for  you  and  all  mankind. 
THE  QUEST  is  the  first  volume  in  a 

larger,  multi-part  adventure. 

Completion  of  the  entire  adventure 

will  require  purchase  of  added  volumes. 

Graphics  and  sound 

enhance  this  classic  game. 

ieK/THpe-$14.e5     24K/Dlak-$19.9S 

SURVIVAL  SOFTWARE 
3033  LA  SELVA,  *B306 
SAN  MATEO,  CA.  94403 


Illusions]! 


WE  ARE  DIFFERENT! 


P.O.  BOX  16489 
IRVINE,  CA  92713 


80%  of  the  games  available  for  Atari 
systems  are  pure  garbage!  The  other 
20%,  the  good  ones,  charge  a  fortune. 

We  create  superior,  total  graphic 
games  at  the  right  price.  We'll  also 
save  you  money  on  hardware. 

Try  us  one  time  with  this  guarantee- 
Send  $15  for  our  Garaes-1  disk  (16  K). 
It  has  two  thinking   games,  CHEENG'S 
RISERS  and  CLOSE  'N  COUNTERS.  Both 
are  one  player  games.  CHEENG  has  10 
levels  of  play,  CLOSE  has  6  levels. 
Your  children  will  love  them,  you'll 
become  addicted  to  them. 

IF   YOU  DON'T   THINK   THE  DISK   IS   WORTH 
EVERY   FENNY,    SEND    IT   BACK  AND  WE'LL 
REFUND   EVERY   PENNY   -    IMMEDIATELY! 

EPSOH   MX-80   PRINTER $497 

Calif  residents  -  add  6%  sales  tax 
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Disk  Directory 
Printer 

Len  Lindsay 

If  you  have  an  Atari  disk,  you  know  that  you  can  see 
its  directory  by  entering  DOS  and  choosing  option 
A.  Well,  here  is  a  program  I  wrote  completely  in 
ATARI  BASIC  that  will  give  you  the  same  directory 
listing.  Then  a  second  program  is  listed  that  will  give 
you  an  "expanded"  directory. 

The  key  to  this  program  is  being  able  to  open 
the  directory  as  a  file  for  a  READ.  This  is  easily 
accomplished  with  the  following  statement. 

100  OPEN  #1,6,0,"D1:*.*" 

Next  you  must  know  how  the  file  name  info  is  stored 
in  the  directory.  The  file  info  is  stored  as  a  string  17 
characters  long. 

The  first  character  tells  if  the  file  is  locked  or 
not.  If  it  is  "*"  then  it  is  locked.  If  it  is  "  "  (space) 
then  it  is  not  locked. 

The  file  name  comes  next.  Characters  3-10  are 
the  file  name.  Characters  11-13  are  the  extension  for 
the  name.  Any  unused  characters  are  stored  as 
spaces.  Note,  however,  that  you  can't  imbed  the 
spaces  in  your  name  when  you  access  the  file. 

Characters  15-17  are  the  number  of  sectors  used 
by  the  program. 

With  that  info  you  can  see  how  the  second,  ex- 
panded directory  list,  works.  You  now  can  read  the 
directory  within  your  programs  by  following  the  new 
simple  methods  shown. 

Listing  1 

9  REM  PRINT  DIRECTORY 

1  REM  -m.  (C)  19S1 

2  REM  :>,'**  LEM  LimSA'i^ 

3  REM  nt 

4  REM  tn  SfifE  hS  UIA  COS 
le  GRtf'HICS  0 

20  DIM  FILENAriE$(20> 

100  OPEN  #Lfc'..0/'Dl=:^..r^F£t1  OPEN  DIRECT 

ORY  FOR  A  REftfj 

110  TRAP'  9y0:FB1  NO  tWE  FILES 

208  Itf'UT  tljFILENArO 

380  F-RINT  FILENAriEt 

406  F-RINT  LEN-rFILEHRr-EJ) 

800  GOTO  280 

900  B€ 


Listing  2 

8  REM  PRINT  DIRECTORY 

1  REM  tn  <C)  19S1 

2  REM  tU  LBI  LIUJSAY 

3  REM  %%t 

4  REM  m  EXPW^DED  DIRECTORY  PRINT 
10  GRAPHICS  0 

20  DIM  FILENAf€f(20) 
100  OPEN  #L6..0/'Dl::4;.:r'^REM  OPEN  DIRECT 
OR"i'  FOR  A  READ 

116  TRAF'  900:  REM  NO  tlDRE  FILES 
200  im.\l  #l;FILEhttME* 
300   IF  LEH( FILENAMES K5  THEN  900 
400  PRINT  "FILENAME  IS=    "; 
410  FOR  L00P=3  TO  13 
420   IF  L00P=11  THEN  PRINT  "."; 
430  IF  FILENftr'E$( LOOP. LOOP X>"   "  THEN  PR 
IHT  FILENAME$( LOOP. LOOP).; 
440  h£XT  LOOP 

450   IF  FILENAr€*(l.l>="*''  T>€N  PFlINT  " 
LOCKED  "; 
460  PRINT 

500  PRINT  -  ^FILENA^E$(15.17);"  SEC 

TORS" 

806  GOTO  290 
900  PRINT  "  ACTORS  FREE  =%FILENAt€$ 


MILSOFT 

The  Best  In  Sound  And  Graphics! 

Presents.,.  HI-RES  LUNAR  LANDER 
You'll  feel  the  gravity,  fire  your  thrustors 
and  land  a  ship  on  the  rocky  lunar  surface. 
ATARI.  BASIC...  I6K   19.95 

MILWAUKEE  SOFTWARE 
P.O.  BOX  94 
BUTLER,  Wl.  53007 

Orders  Shipped  Within  48  Hours. 


FILE-IT  II 

An  expandBd  dtUbiits  syitam 
byJERRTWIirTE 

Designed  tor  Ihe  HOME  USER  or  SMALL 
BUSfNESSPERSON.     Provides     aulomalic 
formatting  lor  accountmg  or  address  label 
records,  or  specify  your  om  79  characler 
record  layout.  Calculates  banking,  checking,  credtt  or  other  accounting  information.  Sorts  all 
data  files,  Can  be  used  for  coupon,  hobby  collection,  appointment  calendar  or  other  personal 
data.  Helps  prepare  reports  at  Tax  Time.  Prints  one  or  two  across  mailing  labels. 
Requires  1  disk  drive,  minimum  ol  24K  RAM  and  tias  60  column  line  printer.  Holds  100+  re- 
cords in  24K;  300  +  records  in  40K.  Supports  single  or  muttiple  disk  drrves  Includes  detailed 
documentation,  users  manual,  sample  data  files  and  utility  programs.  S34.;)5. 
To  Order  (send  check  or  money  order)  or  for  information  write: 
1  TR  SOFTWARE  WUttUNTT 
SWIFTY  SOFTWiUIE,  INC.  P.O.  BOX  m  •  MELWLiE.  N.T.  11747  •  (S1S|  5U-IU1 
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Condensing 
Data 

Statements 
On  The  Atari 

Craig  Patchett 

This  article  was  originally  written  as  an  appendum 
to  my  article  "Designing  Your  Own  Atari  Character 
Sets"  (see  the  March  1981  issue  of  COMPUTE!).  It 
then  occured  to  me,  however,  that  there  are  most 
likely  many  other  applications  where  this  simple 
technique  might  be  useful,  especially  in  the  loading 
of  machine  language  subroutines  from  BASIC 
DATA  statements.  In  general,  any  program  where 
a  significant  amount  of  numbers  between  0  and 
255  must  be  stored  as  data  can  be  reduced  in  size 
using  the  technique. 

An  Atari  memory  location,  as  is  true  with  most 
microcomputers,  can  only  hold  numbers  in  the 
range  of  0  to  255.  Not  by  coincidence,  0  to  255  is 
also  the  range  of  ATASCII  values,  each  of  which 
can  be  translated  to  an  Atari  character  using  the 
CHR$  function.  On  the  same  note,  each  Atari 
character  can  be  translated  to  its  ATASCII  value 
using  the  ASC  function.  This  means  that  one 
character  can  be  used  in  place  of  from  one  to  three 
digits.  Since  characters  can  be  combined  in  charac- 
ter strings,  one  character  can  replace  up  to  three 
digits  and  a  comma  when  used  in  place  of  its  corre- 
sponding value  in  DATA  statements.  Therefore, 
in  programs  that  use  a  lot  of  numerical  data  in  the 
0  to  255  range,  character  strings  can  be  utilized  in 
the  following  way  to  cut  down  the  program's 
memory  requirements: 


REM  /Iflake  sure  we're  not  at  the  e 
rd  of  the  currerit  5trin9:-;-:/ 
30810  IF  f-E=LEN(DHT$)  THEN  i€=0--REftD  DAT 
I 
38S29  REM  /* Increment  ME  (pointer  into  D 

36630  !€=!€+ i 

3004S  REM  ■■■■tConyert  next  character  to  it 

's  hThSCII  'v'aluet--' 

38050  UhLUE=ASC<DhT$(ME..ME)) 

:^b0  REM  /*Hi  1   done:^:/ 

30070  RETLIRi^ 

To  use  this  subroutine,  first  DIMension  DAT|  to 
the  length  of  the  longest  data  string  you  plan  to 
use,  and  initialize  ME  to  0.  Then,  each  time  you 


would  normally  use  a  READ  command,  use  a 
GOSUB  30000  instead  and  the  data  value  will  be 
returned  in  VALUE.  Of  course,  you  must  first 
convert  your  data  to  the  appropriate  Atari  charac- 
tets.  Appendix  C:  ATASCII  Character  Set,  in  the 
BASIC  Reference  Mantial,  can  be  used  to  aid  in 
this  task.  Keep  in  mind  that,  for  the  most  part, 
ATASCII  values  128-255  are  just  the  reverse  of 
values  0-127  (in  other  words,  use  the  reverse 
character  key).  The  <ESC>  key,  in  combination  with 
other  keys,  can  often  be  used  to  get  the  more 
evasive  characters.  To  make  life  a  little  easier  for 
you,  I've  included  this  short  program  that  will 
print  out  the  ATASCII  values  of  any  characters 
typed  while  it  is  running.  Good  luck! 

ie  OPEN  #L4.0..='K=" 
26  GET  #l..i.>ALUE 
30  PRINT  UALLE 
40  GOTO  m 

(Note:  to  get  the  ATASCII  value  of  a  character 
such  as  <ECSwCTRL>+  using  this  program,  just 
type  <CTRL>+.  Pressing  the  'ESC>  key  will  give  you 
the  value  of  the  <ESC><ESC>  character.)  ^ 


World  Class 


Your  ATARI  is  a  world  class  personal  computer.  Bui  you 
need  great  software  in  ordi^r  lo  exploit  its  cjpjbilities. 
And  you  need  information  about  how  it  all  works. 

IRIDIS  is  a  series  of  software  packages  ttiat  will  fielp  you 
enjoy  and  understand  your  ATARI  more  fully.  The 
programs  are  outstanding,  just  as  you  would  expect  from 
the  people  who  have  published  23  issues  of  the  widely 
acclaimed  CURSOR  Magazine  for  the  Pet  since  1978.  But 
IRIDIS  is  more  than  just  a  collection  of  excellent 
programs.  IRIDIS  #2  comes  with  a  S6-page  manual  that 
has  clear,  detailed  explanations  of  how  each  program 
works.  The  explanations  tell  you  line-by-line  what  each 
program  does,  and  how  it  does  it. 

IRIDIS  and  your  ATARI;  A  winning  team.  World  Class! 


IRIDIS #2-Fondedit  and  Knotwork  programs. 
Includes  56  page  User  Manual. 
$15.95  Cassette,  S18.95  disk. 
Mastercharge  and  Visa  welcome. 


Published  By: 


theCODE 
WORKS 


Box  550 

Golela,  CA  93116 

805-683-1585 
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Real-Time 
Clock  On  The 
Atari 

As  the  popularity  of  the  Atari  Computer  grows, 
more  people  are  realizing  that  it  offers  more 
capabilities  than  other  computers  in  the  same  price 
range.  Many  of  its  capabilities,  however,  are  not 
advertised.  For  instance,  I  would  not  have  known 
that  it  had  real-time  clock  hardware  if  my  dealer 
had  not  told  me  about  it.  1  have  since  developed 
this  flexible  3K  program  to  utilize  this  hardware. 
The  program  will  first  ask  you  if  you  want  to 
set  the  alarm  time.  If  you  do,  it  will  ask  you  to  give 
the  time  in  twenty-four  hour  format  (for  example, 
15,30,20).  Otherwise  it  will  disable  the  alarm.  Next, 
it  will  ask  you  if  you  would  like  to  set  the  time.  If 
you  do,  it  will  ask  for  the  hours,  minutes,  and 
seconds,  and  will  enter  this  time  into  the  hardware 
registers.  You  may  use  twenty-four  hour  time  if 
you  wish.  If  you  don't  want  to  set  the  time,  the  time 
presently  in  the  hardware  registers  will  not  be 
changed.  After  fulfilling  these  preliminaries,  the 
clock  time  is  then  displayed  in  the  center  of  the 
screen.  The  time  is  stored  and  kept  in  the  hardware 
and  should  not  be  disturbed  unless  you  hit  SYSTEM 
RESET.  You  may  have  noticed  that  this  program 
uses  large  line  numbers  (near  the  32,767  limit). 
This  enables  you  to  attach  this  program  to  the  end 
of  another  program  (or  several  programs)  as  a 
subroutine.  I  suggest  using  LIST  "C"  to  save  the 
program  and  ENTER  "C"  to  load  the  program. 
These  commands  allow  you  to  enter  the  program 
without  erasing  the  program  that  resides  in  memo- 
ry. LIST  "C",  X,Y  will  list  lines  X  through  Y  to  the 
cassette,  enabling  you  to  save  a  certain  routine 
without  including  the  clock  program.  A  line  by  line 
description  of  this  program  follows. 

30000  Let's  clear  the  screen  and  shut  off  the  cursor. 

3000 1-30002  OFF  is  a  flag.  When  it  equals  1  then  the  alarm  will 
not  go  off. 

30003  TOTAT  is  the  total  alarm  time  in  sixtieths  of  a 

second 

30010-300 16  These  lines  input  the  time  which  is  to  be  placed 
in  the  hardware  registers. 

30020-30021  Register  53279  is  the  register  which  indicates 
which  console  butlon(s)  are  pressed.  It  equals  6 
when  START  is  pressed. 

30025  This  line  POKF.'s  the  clock  hardware  down  toO. 

The  largest  number  a  register  can  have  is  255. 
Register  20  increments  by  1  every  sixtieth  of  a 
second  and  increments  register  19  by  1  when  it 
counts  beyond  255  (back  to  Oagain).  Register  1 8 
increments  by  1  when  register  19  counts  beyond 
255. 

30030-30049  Now  we  break  the  current  time  down  into  six- 
tieths of  a  second  and  store  them  in  the  hardware 
registers. 


30100  Thiscoltects  the  time  froin  the  hardware  regis- 

ters in  sixtieths  of  a  second. 

30150  If  the  time  in  the  registers  is  greater  than  24 

hours,  lines  3 1000- 

310'JO  will  be  executed.  They  bring  the  time  in  the 

registers  down  to  an  equivalent  time  below  the 
24  hour  level.  This  allows  the  time  to  continue 
to  be  kept  in  the  hardware  for  an  indennite 
period  of  time  by  preventing  all  the  registers 
from  counting  beyond  the  255  level  and  going  to 
0  at  the  same  time;  this  would  cause  ihc  time  to 
be  lost, 

30522  This  line  can  be  eliminated  if  24  hour  time  is 
preferred. 

30523  The  time  is  obtained  from  the  registers  in  order 
to  compare  it  at  line  30526  to  the  time  the  alarm 
was  set  to  go  off  at.  Since  the  prograni  is  too  slow 
to  be  able  to  check  the  alann  time  continuously,  a 
tolerance  ( 1 00)  may  be  changed. 

30524  This  line  may  also  be  eliminated  if  2  1  hour  time  is 
preferred. 

30530  This  is  the  line  which  produces  tlie  alarm  sound. 

Use  your  imagination  here! 
30539-30700  The  printing  of  the  tiiue  is  performc-d  by  these 

lines.  They  insure  that  the  zeros  will  be  correctly 

placed  and  that  the  length  of  the  lini-  will  always 

be  the  same. 

38000  PRII'rr  "}"^DIN  K*:  10)  =  POKE  '."SIA 
30K31  7  "Do  you  warit  to  initial  i::e  the  a 
lanfl^ia^PUT  KilF  K$=")-rS"  OR  Xif="aes" 
THEW  OFF=0=GOTO  38893 
38^2  0FF=1=G0T0  30884 
38803  f^.im  "Set  alarm  time  Cu^e  24  hour- 
tiine  in  0.8,8  f onnatl"  a^Fm   HH.Ari..H.S^T 

38004  ?  "Do  aotj  want  to  set  the  time".;   I 

38005  IF  Xf="VES"  OR  K|:="aes"  THEhi  38987 

3800b  GOTO  30839 

3KJ07  *?  ""} " 

30810  PRli-iT  "Hours"..  =  INPUT  H 

38015  PRINT  "hinutes".;  =  IhT'UT  M 

3001b  PRIHT  "Secofi^i?"..-   INPUT  3 

30028  PRINT  "Hit  START  to  besio  the  tim 

H 

30021  IF  PEEK(33275a>6  THEN  38821 

30022  PRINT  ">" 

39823  REH  f^:^:^:^;^:^  PtJT  CURRENT  Tir^  IN  Kfi 

RDWhRE  REGI5TER?^>;^:^^*:^;;a 

30025  POkE  1S.8P»;E  IS. 6^ POKE  28,8 

38038  J=m£d-3-nUm-2+Sti^ 

38048  POKE  1 8 . 1  NT(  T.-X  256*2:^d  ^  ^ 

30043  T=T-(  25d-^:25o  >;i:(  INK T^X 2^i^-:^?^<^  \  ^ ) 

38045  POKE  l^..I^f^'■■T■■^2'^»^^ 

36047  T=T-25c:h  IMT{  T--25b  <  ■• 

30843  POKE  29..  INT(T> 


30188  TiriE=FEEK(28 ^'^PE£K( ISm^^^PE^K' IP 

38158  IF  TIf€>^31S4808  ^HEw  ^imt 
30200  ^l'T=imiV^^-&^^d  5^ 
30388  SEC^TIME-d8-;:(  I^^^(TI"E-■■S8^^ 
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30359  TirtE^iwT.rairi£-SEC;'^e3) 

39400  niN=TIME-nn:iv:  IHT(  Tir€.--SS  ^  ■ 

30500  ^CL:R3=IHT('rTI^E-^tINyoe) 

30505  IF  3EC>=€G  Tf£K  30518 
3850S  GGTC  33515 
30518  f1IK-INK3EC.'-60)+rtIH 
3051 1  SeC=SEC-D9:-J:(  INK 5EC/50 )  > 
30515  IF  niN>=63  THEN  30520 
30518  OjTG  30522 

30520  HCUR3=IKKi1IH/b8)+nOURS 

30521  i1IN=KIN-d0-K:NT(MIN/63)> 

30522  IF  HOuRS^y  ^HEM  H0(iR3=12 

30523  HT^H£^K■=FFE^■^ '  S  ^;:f25r:^25n+rEE-:='  1"  ^4 
256+PEEK^^23) 

30524  IF  H0uR3>12  THEN  HnURS=HiX^:;-12 
3052=;  ^iXl^iD  0-^^.n,i\ 

30525  IF  HB3<HTCnECK-T0TATK188  AND  OFF= 

3052?  Gnin  305^q 

30539  ?  "  "Sd^W   8.-50..  10..  18- FiP  >:=d   TO 

1000^HEXT  'v-^  "I'^^^n;" 

3853S  P!?3ITrOH  15.18 

38540  IF  HGUR3<10  TbB-.   38559 

39542  IF  riINa9  TrEN  30d30 

30544  IF  SEr<10  THEN  30738 

30545  PRINT  t^;t.:hOUR3-8.5)/' ■  MNT<f1IN+9 
.5);"^MKT(SEC+8.5)-uOTn  38138 

39550  IF  iUN-:i0  THEN  36550 

39551  QT^n  38600 

30568  IF  3EC<i0  THEN  PRINT  "0MHT(HQNR3 
+0 . 5  > ,. "  ^  0 " ,.  INTC  '1IN+0 . 5 ) ,. "  ■  0 M KT(  SECtO  .  5 
y-a)jn   30103 

38561  PRINT  ■■8M^^T(HOUR3+0  5). -9"..INT( 
^IN+8,5)/-'^I^^r^SEC^9.5):GGTu  30103 
30600  IF  SEr-:i0  THEN  PRINT  "0MNT-: HOURS 
+8  5  > . "  ■ "  =  IHTf  i  1IN+8  5 ■>..":  0" .  INT''  SEC+8 . 5 ; 
^GOTO  3?tI08 

38601  PRINT  "3"..IHTfHGnR3+0.5)/-MNT(i1 
IN+0.5)/-MNT^3EC-9.5)^GnTO  38180 
38638  IF  SEC<10  TrEN  PRINT  INT(HGUR3-8.5 
j; "  :0"j  INT(riIN+9, 5),. "  ■9MNT'::SECr0 .5)-  GG 
TO  301® 

30D-->1  PKiN  i  iN  :  ■■.  nuvr.^-^y  .  O  ..■..  v    .•  ih  : '.  1  .'ii^-' 

0  5>r'^".INT'3EC+3.5)-GGTD  38199 

38700  PRINT  INTi-HGUR?-9.5).."^MNT':itIN+8 

.5)/'^8"..  INT(3EC+0  5 -GOTO  39109 

arduiSf'iS  clock  rasists.f^s  dov,'?':  24  houf-5 
^im?.  TlnE^PEE'o  13:4256^:25D-;^EEf"  13>t256 
+PEEK(20' 

TiriE=TT'1E-'^13'i9n8-H  I^^(TIf£/51o438 


\)) 


31820  Pnr-:E  lS;INT^•■TI^c^■(256:i:256^; 


p  ,-  ^  .t,  T».  rr-'  ■^  t  k^^ 


25b .'  / 


31848  PGf'E  15.I^mTinE-^5o; 

^l^ifTQ  p-^::e   28.-INTaP1E^ 
31079  GG^O  38133 


Review  Sfy^  PolCer 

Robert  W.Baker 
Atco,  NJ 

STUD  POKER  is  an  interesting  card  game  program 
for  the  16K  Atari  from  Dynacomp,  Inc.,  6  Rippin- 
gale  Road,  Pittsford,  NY  14534.  {$11.95,  cassette; 
$15.95,  diskette)  The  program  includes  two  separ- 
ate menu  selectable  versions  of  familiar  stud 
poker,  each  with  simple  graphics  and  some  sound 
effects.  The  card  displays  are  simply  the  card 
outline  with  the  face  value  and  suit,  no  fancy  card 
displays  are  used.  For  sound,  you  get  to  hear  the 
cards  shuffled  and  deah  along  with  other  approp- 
riate "bells  and  whistles"  at  important  times. 

One  of  the  games  deals  two  cards  to  you  and 
the  Atari,  with  one  card  down  for  the  Atari.  You 
each  bet  on  your  hands,  and  bet  again  after  each  of 
the  remaining  three  cards  are  dealt.  At  each 
betting  interval  you  can  call,  bet/raise  from  $1  to 
$3,  or  fold.  The  current  pot  value  and  your  current 
winnings  or  loses  are  always  displayed.  When  the 
hand  is  over,  the  Atari's  down  card  is  turned  over 
and  the  winner  is  declared. 

The  other  game  is  even  simpler,  both  you  and 
the  Atari  are  each  dealt  five  cards.  Two  of  the 
Atari's  cards  are  face  down  and  not  displayed.  You 
must  bet  on  your  hand  {$10  to  $100)  and  cannot 
fold.  After  betting,  the  Atari's  down  cards  are 
turned  over  and  the  winner  is  declared.  Again, 
your  total  winnings  or  loses  are  displayed. 

The  games  are  rather  interesting  and  it  would 
appear  that  the  Atari's  card  playing  skills  are  pretty 
good.  However,  the  documentation  supplied  was 
rather  confusing  and  did  not  match  the  program 
operation.  The  names  of  the  two  games  as  well  as 
the  betting  limits  were  different  in  the  manual 
from  that  used  in  the  program.  Also,  a  different 
method  of  indicating  whether  to  continue  or  quit 
was  used  by  each  part  of  the  program  after  each 
hand.  One  section  wanted  a  "C"  or  "Q"  while  the 
other  wanted  a  RETURN  with  a  null  or  "Q"  input. 
Totally  confusing!  With  a  little  more  consistency 
and  clearer  documentation  this  could  be  a  very 
nice  package.  © 


CIN  RUMMY  3.0    Piavs  a  strong  game,  with  color  graphics  and 

sound. 

J2K  800 Cass.  S19.9S  40K  800  Disk  321.95 

CASINO  BLACKJACK /COUNTER  Plav  at  a  realistic  casino  table, 
learn  card  councing  to  Oeat  tne  dealer,  or  just  plav  for  fun. 

2AK  400  /  800  Cass.  S19.95  32K  800 Disk  524.95 

LABYRtNTH  RUN  Fascinating /frustrating  test  Of  coor- 
dination, racing  through  narrowing  passages  and  sharp  cor- 
ners. 3  sltiilleveis. 

16K 400/800  Cass.  S14.95  24K 800 Disk  S19.9S 

All  programs  reou ire  jovstlck. 
Calif,  residents  add  6%  sales  tax. 

MANHATTAN   SOFTWARE 

P.O.  BOX  35  PaciHc  Palisades,  CA  90272 

24-hour  phone  for  visa  and  M.c.  orders  (21 3i  454-8290 
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Through  The 

Fill-The-Buffer 

Routine 

With  Gun  And  Camera 


Kerry  Lourash 
Decatur,  Illinois 


This  is  an  effort  to  shed  some  light  on  the  Fill-the- 
Buffer  routine  (FTB)  of  OSI  BASIC-in-ROM. 
Subroutines  with  FFXX  addresses  are  for  the  CIP, 
but  should  be  about  the  same  for  the  C2P.  Let  me 
warn  you  -  all  numbers  in  this  article  are  hex- 
idecimal,  unless  stated  otherwise!  I  will  appreciate 
any  corrections  or  additions  readers  may  have. 

What  Is  It? 

The  buffer  mentioned  is  a  section  of  zero-page 
memory  (locations  13-5A).  When  you  type  in  a  line 
of  BASIC  or  the  tape  recorder  loads  your  favorite 
program  the  computer  stores  one  BASIC  line  at  a 
time  in  the  buffer.  Since  the  buffer  is  only  72 
(decimal)  bytes  long,  no  BASIC  line  can  be  longer 
than  72  (dec.)  characters.  By  the  way,  when  you  type 
a  4-digit  line  number,  you  have  only  68  (dec.) 
characters  left  in  the  line.  The  FTB  takes  input  from 
the  keyboard  or  ACIA  (Asynchronous  Communica- 
tion Interface  Adapter),  depending  on  the  status  of 
the  SAVE  and  LOAD  flags.  After  the  line  is  stored 
in  the  buffer,  other  routines  tokenize  the  line  and 
store  it  in  the  BASIC  workspace. 

What  Does  It  Do? 

This  is  what  the  FTB  does: 

1.  Filters  input  so  no  graphics  or  control  characters 
except  "BEL"  (end  of  line)  and  NULL  (zero)  gets 
into  the  buffer. 

2.  Checks  the  "CTRL  0"  (output)  flag  (loc.  64)  to 
see  if  characters  should  be  output  to  TV  and  ACIA. 

3.  Counts  the  number  of  characters  input  and  gives 
an  automatic  carriage  return/line  feed  (CR/LF)  if  the 
line  length  stored  in  loc.  OF  is  exceeded. 

4.  Outputs  ten  NULLS  after  a  CR,  and  an  addi- 
tional number  of  NULLS  equal  to  that  stored  in  loc. 
OD  after  a  LF. 


5.  Implements  control  characters  such  as  carriage 
return  (OD),  line  feed  (OA),  "BEL"  (07),  backspace 
(5F),  and  line  delete  (@,40). 

6.  Puts  a  NULL  in  the  buffer  at  the  end  of  a  line 
to  mark  the  end  of  line  for  following  routines.  Sets 
the  X  and  Y  registers  to  the  start  of  the  buffer(-l). 

Preparing  For  Our  Journey 

Machine  language  routines  are  murder  to  decipher, 
and  the  FTB  is  no  exception.  The  code  is  compact  in 
order  to  stuff  BASIC  into  8K  of  ROM,  and  uses 
nested  subroutines  extensively.  In  my  chart,  I've  put 
the  subs  immediately  after  the  point  where  they  are 
called,  instead  of  in  numerical  order.  Also,  subs  are 
indented  and  bracketed,  so  the  addresses  at  the  far 
left  are  the  main  routine  and  the  subs  are  at  the 
right,  in  brackets.  The  format  is  somewhat  like  the 
outlines  we  did  in  school.  I've  tried  to  make  the 
routine  understandable  to  both  machine  language 
and  BASIC  oriented  readers.  The  ML  addresses 
have  been  kept  so  any  part  of  the  routine  can  be  pin- 
pointed and  disassembled  for  additional  info;  BASIC 
readers  can  consider  the  addresses  as  line  numbers. 
Most  assembly  language  has  been  replaced  by  ex- 
planations of  what  is  happening.  I  have  used  only  a 
few  mnemonics  and  have  given  their  BASIC 
equivalents  in  the  heading  of  the  chart. 

Into  The  Jungle 

Now  we're  thru  the  preliminaries,  on  wit;i  the  safari! 
Look  for  line  A357  on  the  chart;  this  is  our  starting 
point.  First,  the  X  register  is  zeroed.  The  x-reg. 
counts  characters  as  they  are  input  into  the  buffer. 
Through  a  series  of  JSR'sQSR^  GOSUB)  and 
JMP(GOTO)  thru  RAM,  we  come  to  the  input  sub 
at  FFBA.  For  those  who  have  the  Aardvark  cursor 
program,  this  is  where  it  steps  in  and  does  its  stuff. 
Locations  218  and  219  are  changed  so  that  BASIC 
jumps  to  the  Aardvark  program  instead  of  FFBA. 

The  Input  Trek 

The  input  sub  looks  at  loc.  203,  the  LOAD  flag.  If 
the  MSB  (Most  Significant  Bit)  of  203  is  zero,  the 
sub  goes  to  FDOO,  the  keyboard  scan  sub,  which 
waits  for  an  input  from  the  keyboard,  decodes  it, 
puts  it  in  the  A  register,  and  returns  (RTS)  to  A389. 
On  the  other  hand,  if  the  MSB  of  loc.  203  is  1,  the 
sub  checks  the  LSB  (Least  Significant  Bit}  of  FOOO, 
the  ACIA's  status  register,  and  waits  'til  it  is  zero, 
which  means  the  ACIA  has  a  byte  ready  in  FOOl. 
This  byte  is  stored  in  the  A-rcg.  and  the  routine 
returns  to  A389,  just  like  the  keyboard  routine  does. 
Oh  yes,  one  thing  I  forgot  to  mention:  before  FOOO  is 
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A  JOURNAL   FOR  OSI  USERS!! 

The  Aardvark  Journal  is  a  bimonthly  tutorial  for  OSI 
users.  It  features  programs  customized  for  OSI  and 
has  run  articles  like  these: 

1|  Using  String  Variables. 

2)  High  Speed  Basic  On  An  OSI. 

3)  Hooking  a  Cheap  Printer  To  An  OSI. 

4)  An  OSI  Disk  Primer. 

5)  A  Word  Processor  For  Disk  Or  Tape  Machines. 

6)  Moving  The  Disk  Directory  Off  Track  12. 

First  year  issues  already  available! 
39.00  per  year  (6  issues) 


ADVENTURES 

Adventures  are  interactive  fantasies  where  you  give  the 

computer  plain  English  commands  (i.e.  take  the  sw/ord, 

look  at  the  control  panel.)  as  you  explore  alien  cities, 

space  ships,  ancient  pyramids  and  sunken  subs.  Average 

playing  time  is  30  to  40  hours  in  several  sessions. 

There  is  literally  nothing  else  like  them  —  except 

being  there  yourself.  We  have  six  adventures  available. 

ESCAPE  FROM  MARS  -  Explore  an  ancient 

Martian  city  vifhile  you  prepare  for  your  escape. 

NUCLEAR  SUBMARINE  -  Fast  moving 

excitement  at  the  bottom  of  the  sea. 

PYRAMID  -  Our  most  advanced  and  most 

challenging  adventure.  Takes  place  in  our 

own  special  ancient  pyramid. 

VAMPIRE  CASTLE  -  A  day  in  old  Drac's 

castle.  But  it's  getting  dark  outside. 

DEATH  SHIP  -  It's  a  cruise  ship  -  but  It  ain't 

the  Love  Boat  and  survival  is  far  from  certain. 

TREK  ADVENTURE  -  Takes  place  on  a 

familiar  starship.  Almost  as 

good  as  being  there. 


NEW  SUPPORT   ROMS   FOR   BASIC 
IN  ROIVl  MACHINES 

CIS  --  for  the  C1P  only,  this  ROM  adds  full 
screen  edit  (unctions  (insert,  delete,  change 
characters  in  a  basic  line).  Soltwave  selectable 
scroll  windows,  two  instant  screen  clears  (scroll 
window  only  and  full  screen),  software  cfiose  of 
OSI  or  standard  keyboard  format.  Bell  support, 
600  Baud  cassette  support,  and  a  few  other 
features.  It  plugs  in  in  place  of  the  OSI  ROM. 
NOTE  :  this  ROM  also  supports  video  conversions 
for  24,  32,  48  or  64  characters  per  line.  Replaces 
video  swap  tape  on  C1P  model  2.  All  that  and  it 
sells  for  a  measly  S39.95. 

C1E/C2E  for  C1/C2/C4/C8  Basic  in  ROM  ma- 
chines. This  ROM  adds  full  screen  editing,  soft- 
ware selectable  scroil  windows,  keyboard  correc- 
tion (software  selectable),  and  contains  an  ex- 
tended machine  code  monitor.  It  has  breakpoint 
utilities,  machine  code  load  and  save,  block 
memory  move  and  hex  dump  utilities.  A  must  for 
the  machine  code  programmer  replaces  OSI  sup- 
port ROM.  Requires  installation  of  additional 
chip  when  installed  in  a  C2  or  C4.C1  installation 
requires  only  a  jumper  moue.  Specify  system 
359.95. 


DISK  UTILITIES 

SUPER  COPY  Single  Disk  Copier 
This  copy  program  makes  multiple  copies, 
cooies  track  zero,  and  copies  all  the  tracks 
that  your  memory  can  hold  at  one  time  — 
up  io  12  tracks  at  a  pass.  It's  almost  as  fast 
as  dual  disk  copying.  -  315.95 
MAXIPROSS  {WORD  PROCESSOR)  -  65D 
polled  keyboard  only  -  has  global  and  line  edit, 
right  and  left  margin  justification,  imbedded 
margin  commands,  choice  of  single,  double  or 
triple  spacing,  file  access  capabilities  and  all  the 
features  of  a  major  word  processor  —  and  it's 
onlvS39.95. 


P.C.  BOARDS 

MEMORY  BOARDS!!  -  for  the  CIP.  -  and  they 
contain  parallel  ports! 

Aardvarks  new  memory  board  supports  8K 
of  2114'3  and  has  provision  for  a  PIA  to  give  a 
parallel  pons!  It  sells  as  a  bare  board  for  S29,95. 
When  assembled,  the  board  plugs  into  the  expah' 
sion  connector  on  the  600  board.  Available  now! 

PROM  BURNER   FOR  THE  CIP  -  Burns  single 
supply  2716's-  Bare  board  -  S24.95. 
MOTHER    BOARD    -    Expand   your  expansion 
connector  from  one  to  five  connectors  or  use  it 
to  adapt  our  CIP  boards  to  your  C4/8P.  -S14.95. 

ARCADE  AND  VIDEO  GAMES 

GALAXIA  one  of  the  fastest  and  finest  arcade 
games  ever  written  for  the  OSI,  this  one  features 
rows  of  evasive,  hardhitting,  dogfighting  aliens 
thirsty  for  your  blood.  For  those  who  loved  (and 
tired  of  I  Alien  Invaders.  —  P.S,  The  price  is  a 
giveaway.  SPECIFY  SYSTEM! 
Cassette  S9 .95  -  Disk  S12.95 

TIME  TREK  (SKI  -  real  time  Startrek  action. 
See  your  torpedoes  moue  across  the  screen!  Real 
graphics  -  no  more  scroHina  displays.  S9.95 
INTERCEPTOR  CIP  ONLY!  An  all  machine 
code  program  as  fast  and  smooth  as  the  arcades. 
You  use  your  interceptor  to  protect  your  cities 
from  hordes  of  enemy  invaders.  A  pair  of  auto- 
matic cannons  help  out,  but  the  action  speeds  up 
with  each  wave  of  incoming  ships.  Thf  fastest 
and  most  exciting  CIP  game  yet. 
CIP  Cassette  S19.95 

MINOS  -  A  game  with  amazing  3D  graphics. 
You  see  a  maze  from  the  top,  the  screen  blanks, 
and  then  you  are  In  the  maze  at  ground  level, 
finding  your  way  through  on  foot.  Realistic 
enough  to  cause  claustrophobia.  -  S12,95 


SINGLE  STEPPER  /  MONITOR 

This  is  probably  the  finest  debugging  tool  for 
machine  code  ever  offered  for  OS)  systems.  Its' 
trace  (unction  allows  you  to  single  step  through 
a  machine  code  program  while  it  continuously 
displays  the  A,  X,  Y  and  status  registers  and  the 
program  and  stack  pointers.  You  can  change  any 
o(  the  registers  or  pointers  or  any  memory  loca- 
at  any  time  under  program  control,  It  takes  well 
under  Ik  and  can  be  relocated  anywhere  in  free 
memory.  It  is  a  (ine  tool  for  all  systems  —  and 
the  best  news  of  at!  is  the  extremely  low  price  we 
put  on  It,  -  TapeS19.95  -  Disk  324,95 

FOR  DISK  SYSTEMS  -  (65D,  polled  key- 
board and  standard  video  only.) 
SUPERDISK.  Contains  a  basic  text  editor  with 
functions  similar  to  the  above  programs  and  also 
contains  a  renumberer,  variable  table  maker, 
search  and  new  BEX  EC  programsThe  BEXEC* 
provides  a  directory,  create,  delete,  and  change 
utilities  on  one  track  and  is  worth  having  by 
itself.-  S24.95  on  5"  disk  -  S26.95  on  8". 

AARDVARK  IS  NOW  AN  OSI  DEALER! 

Now  you  can  buy  from  people  who  can  support 
your  machine, 

-  THiS  MONTH'S  SPECIALS  - 

Superboard  II  S279 

CIP  Model  II  429 

C4P  749 

8K  610  board  for  CIP  269 

Epson  MX-80  printer  with  RS233  installed  595 

.  and  we'll   include  a  free  Text  Editor  Tape 
with  each  machine! 

True  32X32  Video  Mod  Plans  for  CIP 

(4  Chips  33.00  Crystal  Required) 

$7.95 


This  is  only  a  partial  listing  of  what  we  have  to  offer.  We  now  offer  over  100  programs,  data  sfieets,  ROMS,  and  boards 
for  OSI  systems.  Our  SI. 00  catalog  lists  it  all  and  contains  free  program  listings  and  programming  hints  to  boot. 

Aardvark  Technical  Services  •  1690  Bolton  •  Walled  Lake,  Ml  48088 

{313)669-3110 
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checked,  the  keyboard  is  checked  to  see  if  the  space 
bar  has  been  hit.  If  so,  the  LOAD  flag  is  turned  off 
and  we  JMP  to  FDOO  and  then  RTS  to  A389. 

Now  we  have  a  byte,  but  we're  not  done  pro- 
cessing it  yet.  At  A389-A396  there  is  a  section  of 
code  that  tells  the  CPU  to  do  nothing  for  a  few 
microseconds.  I'm  not  sure  whether  this  is  a  time 
delay  or  just  a  spot  where  some  code  was  deleted  and 
the  gap  not  closed  up.  Anyone  know?  After  this  lull, 
the  MSB  of  the  input  byte  is  set  to  zero  so  we  don't 
get  any  graphics  characters  and  if  the  char,  is  a 
CTRL  0(0F)  the  output  flag  (loc.  64)  is  toggled. 
That  means  the  output  flag  is  changed  to  FF  (all  I's) 
if  it  is  zero,  and  vice  versa.  Finally,  the  input  pro- 
cessing is  completed  and  we  RTS  to  the  main  routine 
at  A35C. 

Character  Runs  The  Gauntlet 

At  A35C  the  character  is  tested  to  see  if  it  is  a 
"BEL".  If  it  is,  the  X-register  is  checked  to  see  if 
the  buffer  is  full  (more  than  71  dec).  If  there  is  room 
in  the  buffer,  "BEL"  is  stored  in  the  buffer  and  sent 
to  the  output  sub  A8E5  (more  on  this  sub  later).  At 
A381  we  are  sent  back  to  A359  to  get  another 
character.  If  the  buffer  is  full,  the  "BEL"  is  output 
to  the  TV  (or  ACIA,  if  doing  a  SAVE)  by  A8E5, 
but  "BEL"  is  not  stored  in  the  buffer.  Now  we  are 
back  at  A359. 

Let's  temporarily  bypass  the  test  for  carriage 
return  (A360)  and  look  at  A364.  This  test  blocks  out 
control  and  graphics  characters  and  sends  us  back  to 
A359.  That's  why  there's  no  way  to  stick  a  graphics 
char,  directly  into  a  line,  even  in  a  PRINT  state- 
ment, without  a  CHRS  command.  Look  in  your 
graphics  manual  and  sec  what  characters  are  legal 
(20-7D). 

At  A36C  we  test  for  @,  the  line  erase  character. 
We  branch  to  A351  and  JSR  to  A8E5  (outputs  the 
@  character).  Then  a  JSR  to  A86C,  which  sends  a 
CR  and  a  LF  to  A8E5,  sending  the  cursor  to 
"home".  Now  an  RTS  to  A357  to  zero  the  buffer 
counter,  and  we  are  back  at  A359,  ready  to  start 
filling  the  buffer  again.  A370  tests  for  "SHIFT  0". 
Oddly  enough,  the  ASCII  of  "SHIFT  0"  happens  to 
be  5F,  which  is  also  the  cursor  character.  This  time 
we  branch  back  to  A34B.  A  JSR  to  A8E5  outputs  a 
cursor  character.  A34E  decrements  the  buffer  counter 
(X),  and  if  we  haven't  erased  backward  beyond  the 
start  of  the  buffer,  A34F  sends  us  to  ol'  A339.  If  we 
have  erased  too  far,  a  JSR  to  A86C  homes  the  cur- 
sor, A357  zeroes  the  buffer  counter,  and  we  start  fill- 
ing the  buffer  at  A359. 

At  A376  the  buffer  counter  is  checked.  If  the 
buffer  is  full,  the  input  char,  is  changed  to  "BEL" 
(A37C)  and  output  (A8E5)  to  tell  you  you're  wasting 
your  time.  Nothing  is  stored  in  the  buffer  and  we 
branch  to  A359  for  another  journey  thru  the  FTB. 
Finally  at  A378,  the  character,  if  it  has  passed  all  the 
tests,  is  stored  in  the  buffer.  The  contents  of  the  buf- 
fer counter  (X)  are  added  to  the  number  13  (start  of 
the  buffer)  and  the  character  is  stored  at  the  resulting 
address.  A37A  increments  the  buffer  counter, 
counter  and  A37E  JSR's  to  A8E5,  which  prints  the 
character. 


The  A8E5  Routine 

Now  for  an  explanation  of  the  A8E5  sub.  If  the  MSB 
of  the  output  flag  (loc.  64)  is  a  1,  we  RTS  with  no 
output  to  TV  or  ACIA. 

If  the  MSB  is  zero,  we  check  to  see  if  the  ASCII 
of  the  char,  is  less  than  20  (BEL,  CR,  LF).  If  so,  we 
skip  the  line  length  check  and  branch  to  /\8FA.  At 
A8FA  we  JSR  to  FFEE,  which  JMPs  to  the  address 
found  in  021A  and  021 B.  This  address  is  normally 
FF69,  but  you  could  cook  up  your  own  routine  and 
[)ut  its  starting  address  in  021A  and  021  B.  From 
FF(39,  we  JSR  to  BF2D,  the  video  output  sub,  which 
I  will  explain  in  another  article.  To  make  a  long 
story  short,  a  "BEL"  will  be  displayed  as  a  graphics 
character,  a  CR  vvill  cause  the  cursor  to  be  moved  to 
the  start  of  the  line,  and  a  LF  will  scroll  ihe  screen 
and  "home"  the  cursor. 

Now  we  RTS  from  the  video  sub  and  check  the 
status  of  the  SAVE  flag  (205).  If  205  con:ains  a  zero, 
we  RTS  to  A90] .  If  the  SAVE  flag  is  non-zero  the 
ACIA  status  register  is  monitored  until  its  second  bit 
is  zero  and  then  the  character  is  sent  to  the  ACIA 
(loc.  FOOl).  If  the  character  is  a  CR  then  10  (dec.) 
NULLs  are  also  sent  to  the  ACIA  (this  gives  the 
computer  time  to  process  the  line  and  scroll  the 
screen  when  the  program  is  LOADcd  from  tape)  and 
then  we  RTS  to  A96l.  A901  RTS's  to  A'^81  which 
brings  us  back  to  A359. 

Back  at  A81^A,  we  assumed  the  in[3ut  character 
would  be  less  than  20.  Let's  see  what  happens  if  it's 
greater  than  20.  At  A8EE  addresses  OE  and  OF  are 
comjjared.  OE  is  the  counter  for  the  number  of 
characters  since  the  last  CR.  OF  contains  the  user- 
selectable  line  length  (remember  the  "terminal 
width?"  message  at  cold  start?). 

Don't  confuse  this  line  length  with  the  max- 
imum line  length  for  the  video  stored  at  FFEl  or  the 
cursor  position  counter  at  loc.  0200.  If  OF  and  OF  are 
equal  then  there  is  a  JSR  to  A86C.  At  A86C  a  CR 
and  anLF  are  fed  to  the  A8E5  sub  for  an  automatic 
LF/CR.  At  A87A  an  additional  number  of  NULLs 
equal  to  the  number  stored  in  loc.  OD  are  output.  If 
OE  and  OF  aren't  equal  there  is  a  branch  to  A8F7 
and  OE  is  incremented  before  the  JSR  to  I  FEE.  The 
character  is  output  to  the  TV  and,  if  the  SAVE  flag 
is  on,  to  the  ACIA.  Finally,  we  return  to  .A359. 

Last  Leg  of  Our  Journey! 

Have  ]>atience,  our  journey  is  almost  at  an  end.  We 
skii)ped  over  (he  CR  test  at  A360,  now  let's  go 
through  that  one.  If  the  input  is  a  CR,  a  branch  is 
made  to  A86C  which  puts  a  NULL  at  the  end  of  the 
line  in  the  buffer,  marking  the  end  of  the  line.  This 
done,  we  are  at  A86C,  which  starts  the  auto  CR/LF 
and  the  e.vtra  NULLs  from  loc.  OD.  When  we  reach 
the  end  of  the  sub  at  A88A  we  RTS  not  to  the  FTB 
but  to  the  Tokenize-the-Buffer  routine,  which  is 
another  story. 

I  highly  recommend  both  Carlson's  OSI  Basic  In 
ROM  and  William's  and  Dorner's  First  Bank  of  OSI. 
The  information  in  their  books  was  invaluable  in 
writing  this  article.  I  would  like  lo  hear  from  other 
people  interested  in  Basic-in-ROM. 
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Fill-The-Buffer  Routine  (A357) 
JSR-GOSUB 
RTS- RETURN 
BRANCH  JMP  -GOTO 

INC -ADD  1  (TO) 
DEC  -SUBTRACT  1  (FROM) 
/02 1 80/  -  CONTENTS  OF  (LOG.  0218) 
CHAR  -ASCII  CHARACTER 
MSB  -  MOST  SIGNIFICANT  BIT 
LSB  LEAST  SIGNIFICANT  BIT 
ALL  NUMBERS  IN  HEX: 
A34B  JSR      A8E5 

A8E5    (SEE  A8E5  BELOW) 

A90I    RTS 
A34E   DEC     X-REG.  (BUFFER  COUNTER) 
A34F    IFX      GREATER  THAN  ZERO  THEN  A3  5  9 
A351   JSR      A8E5 

A8E5    (SEE  BELOW) 


A87A 
A886 
A88A 
A8F7    INC 
A8FA  JSR 
FF69 


FF6D 
FF73 


A901    RTS 
A354   JSR      A86C 

A86C   (SEE  BELOW) 


A381 


FF76 
FF7D 
FF8A 
A901    RTS 
BRANCH  TO  A359 


A901RTS 

OUTPUT  NO.  OF  NULLS  IN  ADDRESS  OD 

ZERO  ADDRESS  OE  (NO.  OF  CHARS.  SINCE  CR) 

RTS 

OE 

FFEE 

JSRBF2D 

BF2D  VIDEO  OUTPUT  ROUTINE 

....   (THIS  WILL  BE  EXPLAINED 

NEXT  INSTALLMENT.) 

BF72  RTS 

IF  SAVE  FLAG  /0205/  IS  OFF,  RTS 

JSRFCBl 

FCB 1  IF  STATUS  REG.(fOOO)  OF  ACI A 

NOT  READY,  THEN  FCBl 

FCB  A  WRITE  CHAR.  TO  ACIA  (FOO 1) 

FCBDRTS 

IF  CHAR  WAS  NOT  A  CR,  RTS 

WRITE  10(DEC.)  NULLS  TO  ACIA 

RTS 


A357 
A359 


A88A  RTS 

ZERO  X-REGISTER  (BUFFER  COUNTER  =  0) 

JSR      A3 86 

A386   JSRFFEB 

FFEB  JMP  /2 1 8,2 1 9/  (NORMALLY  FFB  A) 

FFBA  IF  LOAD  FLAG  OFF,  BRANCH  TO  FFD8 

FFBF  IF  SPACE  BAR  HIT,  BRANCH  TO  FFD5 

FFCB  IF  ACIA  NOT  READY,  BRANCH  TO  FFBF 

FFDI  LOAD  CHAR  FROM  ACIA  AND  RTS 

FFD5  TURN  OFF  LOAD  FLAG 

FFD8  JMPTO  FDOO  (KEYBOARD  SCAN  SUB) 

FDOO  (RETURNS  WITH  CHAR.  IN  A-REGISTER) 

FDCERTS 

TIME  DELAY? 


A389 
A396 
A397 
A399 


FULL  GRAPHICS!.. 

—  QS.I.  FLIGHT  SIMULATOR- 


KITH  YOUR  SPEED, ALTITUDE, COMPASS, FUEL, FEET  OF  RUNHftY  AND 
DISTANCE  DISPLAYED  ON  GAGES. KATCH  YOUR  AIRCRAFT  BANK, CLIMB 
STALL, AND  DIVE  THROUGH  THE  HINDOH  OF  YOUR  COCKPIT.MOVING 
HOUSES, TREES.fiUNWAYS, AND  CLOUDS. AUDIBLE  AND  VISIBLE  ALARMS 
ON  AIR  SPEEDS.EVEN  FLAPS!  GRAPHICS  WRITTEN  IN  MACHINE  CODE 
FOR  HIGH  SPEED, AND  NOT  JUST  SINGLE  POKES  TO  SCREEN  BUT 
TRUE  FULL  GRAPHICS.   BK     C2/C4P         tl4.95 


HfiNY  OTHER  FULL  GRAPHICS  PROGRAMS  AVAILABLE, INCLUDING  A 
SLOT  MACHINE  WITH  ROLLING  NINDOHS, MOVING  ARM  AND  SOUND. 
CATALOG  AND  FREE  HARD  COPY  OF  6RAPHICS  PROGRAM ii.OO 


WFG  MICRO  DATA 

lk\    SURREY    DRIVE      STREAMWOOD, I LL.    60103 


A35C 
A360 
A866 


A86C 
A88A 
A364 
A36C 
A3  70 
A376 
A378 
A37A 
A37C 
A37E 


MASK  MSB  OF  CHAR.  TO  ZERO 
IF  CHAR,  IS  "CNTRLO"  TOGGLE  OUTPUT 
FLAG  (0064) 
A3A5  RTS 

IF  CHAR.  IS  "BEL"  (END  OF  LINE),  BRANCH  TO  A376 
IF  CHAR.  IS  CARRIAGE  RETURN,    BRANCH  TO  A866 

PUT  A  NULL  AT  END  OF  LINE  IN  THE  BUFFER  (THIS  SUB  ALSO  SETS  X  REGISTER  &  Y-REGISTER  TO  POINT 
AT  BUFFER 
FOR  GET-CHAR.  SUB) 
(SEE  BELOW) 
RTS     GO  TO  TOKENIZE  B UFFER  ROUTINE-THE  END. 
IF  CHAR.  IS  LESS  THAN  20  OR  GREATER  THAN  7D  THEN  A359 
IF  CHAR.  IS  @  (ERASE  LINE)  THEN  A3  51 
IF  CHAR.  IS  5F  (BACKSPACE,  SHIFT  0)  THEN  A34B 
IF  LINE  LENGTH  IS  GREATER  THAN  71(DEC.)  THEN  A37C 
STORE  CHAR.  IN  BUFFER 

INC  X-REG.  (BUFFER  COUNTER)  AND  GOTO  A37E 
CHANGE  A-REG.  (CHAR.  INPUT)  TO  "BEL" 
JSR      A8E5 

A8E5    IF  OUTPUT  FLAG(0064)  IS  ON,  RTS  (NO  OUTPUT) 
A8E A  IF  CHAR.  IS  LESS  THAN  20(BEL,  CR,  LF) 
BRANCH  TO  A8F9 

CHARS  ALLOWED  PER  LINE,  JSR  A86C 
A86C  PUT  CR  IN  A-REG.  (TO  BE  OUTPUT) 
A86E  PUT  CR  IN  ACCRESS  OE 
A870JSRA8E5 
A8E5 

A901  RTS 
A873    PUT  LF  IN  A-REG. 
A875    JSRA8E5 

A8E5 


OSI 
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FOOTU: 

FOO  Revisited 

A  Game  For  The  OSI  C1P,  or  how  we  learned 
the  true  meaning  of  the  oft  used  phrase  "This 
program  is  easily  adapted  to. . ." 

Charles  M.  and  Michael  J.  De  Santis 

On  p.  26:45  of  the  July  1980  issue  of  MICRO,  the 

"small  systems  jornal"  from  Ohio  Scientific  listed  a 
little  race  program  called  "FOO".  It  was  slated  that 
the  program  would  run  on  disk  based  OSI  machines 
but  that  "the  program  is  easily  adapted  to"  OSI 
basic-in-ROM  machines.  Well,  maybe  its  easy  if 
you're  one  of  OSI's  computer  designers  or  software 
whizzes  and  know  where  all  the  goodies  are  tucked 
away  inside  all  the  OSI  computers,  but  my  son 
Mike  and  I  had  one  devil  of  a  weekend  getting 
"FOO"  to  run  on  our  diskless  —  C 1  P.  However,  I 
can't  say  it  was  a  bad  experience  because  we  learned 
a  lot  about  our  little  machine  and  have  come  up 
with  a  couple  of  things  that  should  be  of  interest  to 
other  C 1 P  owners  as  well. 

A  Carriage  Control 

For  instance,  did  you  know  that  SPC  (0)  when  used 
in  a  PRINT  statement  causes  about  1 5  line  feeds  to 
occur.  We  discovered  this  one  while  trying  to 
figure  out  why  the  roadway  on  OSI's  version  oi 
"FOO"  would  space  out  and  break  up  occasionally 
(see  their  line  550). 

KeytHKird  Control  Routine 

After  that  was  corrected,  our  next  problem  was  to 
get  the  vehicle  in  the  game  moving  under  keyboard 
control.  We  found  that,  for  some  reason  that  we 
didn't  want  to  take  a  lot  of  time  to  discover,  the 
subroutine  starting  at  line  600  of  the  OSI  version 
of  the  game  wouldn't  work  on  the  CI  P  as  the 
program  was  originally  written. 

To  correct  this  problem,  we  just  re-wrote  the 
subroutirie  using  the  "more  standard"  format  from 
the  OSI  graphics  manual,  i.e.  POKE  57088,  row  #: 
IF  PEEK  (57088)  =  col.  #  THEN  ...etc.  However, 
our  keyboard  contn^l  s<jf  tware  evolved  into  a  form 
that  we  think  is  really  useful  for  many  other 
programs. 

In  the  typical  game  program  as  in  "FOO", 
nimibers,  i.e.  number  keys,  are  u.sed  to  control  the 
direction  of  an  object  on  the  video  screen,  e.g.  "1" 
for  movements  to  the  left  and  "2"  for  movements 
to  the  right.  A  problem  with  this  approach  usually 
crops  up  at  the  end  of  a  game  if,  for  instance,  an 
INPUT  statement  is  used  to  query  the  user  about 
continuing.  If  the  player  isn't  fast  enough  (he's  just 
been  contnjilinga  space  ship  and  has  crashed  into 
a  star  at  30,000  mi/hr.)  he  enters  a  "  1"  or  "2"  where 


a  "Y"  or  an  "N"  was  expected,  and  be  has  to  fuss 
around  to  correct  the  entry  or  restart  the  program 
if  he's  already  hit  the  RETURN.  The  more  insidious 
version  of  this  problem  arises  when  the  "keyboard- 
control-during-program-execution"  feature  is 
turned  off  while  you're  still  holding  down  the  "I" 
or  "2"  key.  This  situation  usually  arises  abrubtly 
because  of  a  game  rule  violation  of  some  sort.  The 
game  stops  and  control  returns  to  BASIC.  This 
happens  so  fast  that  you're  still  holding  down  one 
of  the  number  control  keys,  and  BASIC  interprets 
this  to  be  the  entry  of  a  program  line  number.  If 
you  type  anything  else  and  then  hit  the  RETURN 
you've  just  added  a  new  line  to  your  program;  and 
you  won't  know  it  until  the  next  time  you  try  to  run 
it.  My  favorite  error  in  this  regard  ends  up  with 
line  I  reading;  1  LIST.  When  the  program  is  run, 
I  get  a  listing. 

Well  here's  how  to  fix  things  so  that  the  prob- 
lem never  happens  again.  First  of  all.  don't  use 
numbers  for  control  fimctions  (obvious,  right?); 
we've  used  the  left  and  right  shift  keys  for  control 
for  several  reasons:  (a)  they're  spaced  a  nice  distance 
apart  for  hand  control;  and  (b)  they're  both  access- 
ible using  the  same  row  nimiber  in  the  keyboard 
polling  routine. 

Secondly,  and  this  is  where  the  serendipity 
comes  in,  the  SHIFT  LOCK  key  must  be  released 
in  order  for  the  SHIFT  keys  to  be  activated  since  it 
is  also  accessed  through  the  same  row  number.  In 
our  version  of  "FOO",  after  all  of  the  game  options 
are  selected,  we  use  instructions  such  as: 

270  PRINT  "TO  START,  RELEASE  SHUrT  LOCK" 

271  POKE  57088,  254:  IF  PEEK  (57088)  ==  254  THEN 
270 

The  "254"  is  the  column  number  ol  the  SHIFT 
LOCK  key  on  the  polled  keyboard  so  that  line  271 
keeps  getting  repeated  until  the  SHIFT  LOCK  is 
released.  As  soon  as  it  is  released,  the  game  starts 
and  the  shift  keys  are  active.  If  the  game  should 
end  abruptly  or  unexpectedly,  and  key;;  that  may 
[lave  been  pressed  are  not  entered  because  the 
RETURN  key  is  inactive  while  the  SHIFT  LOCK 
key  is  not  depressed. 

The  SHIFT  LOCK  must  be  piessed  in  order 
for  BASIC  to  respond.  At  the  end  of  the  game  or 
at  any  intermediate  INPUT  statement,  we  print  a 
reminder  to  "PUSH  THE  SHIFT  LOCK"  for  the 
proper  data  entry  or  to  restore  normal  operation. 
It's  a  great  way  to  do  it!  Try  it,  you'll  tike  it. 

FOOTU  — C1P  Version 

Listing  1  is  otu"  version  of  FOO  modified  to  run  on 
our  C 1 P  which  has  4k  of  memory.  Some  of  the 
scaling  factors  of  the  original  program  lave  been 
eliminated  and  the  SHIFT  and  SHIFT  LOCK 
features  discussed  in  this  aiticle  are  employed.  The 
display  iias  been  scaled  to  lit  the  ClP's  capabilities. 
For  other  machines,  lines  1 10,  230,  240,  290  and 
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520  may  have  to  be  modified.  Also  lines  600  -  660 
will  have  to  be  modified  for  C2  and  C4  computers. 
Just  remember ....  "This  program  is  easily  adapted 
to  .  .  ."  Good  Luck! 


FOOTU 
100  POKE  530,  1 

110  KY  =  57088:SM  =  2:MS=1:RN  =  0 
115  BS=  54051 
117  ML  =  0:SN  =  255 
120  LP  =  5 
130  PL=2/LP 
155  KP  =  0 
160  IF  A$  =  "Y"  THEN  ME  =  EM: WI  =  WF:GU  =  UG: 

GOTO  270 
170  FORI=lTO30:PRINT:NEXTI 
180  PRINT  "FOOTU" 
190   PRINT:  PRINT"RACEW AY" 
200  PRINT:PRINT"YOU  RUN  AT  YOUR  OWN 

RISK!" 
2 1 0  PRINT:  PRINT"LEFT  =  LEFT  SHIFT  RIGHT  = 

RT  SHIFT" 
215  PRINT:PRINT"OVERDRIVE=CTRL" 
230   PRINT:  INPUT"INITIAL  WIDTH  (1-20)";WI 

240  PRINT:INPUT"DELAY(1-15)";ME 

241  EM  =  ME 
245  PRINT 

250  GU  =  0:INPUT"PEDESTRI ANS  (Y/N)  ";X$: 
IF  LEFT$(X$,I)  =  "Y"THEN  GU  =  .3 

260  KP  -  0:  INPUT  "KILLER  FOO  (Y/N)";  X$: 
IF  LEFr$(X$,l)  =  "Y"  THEN  PK=  1 

270  PRINT:  PRINT  "TO  START  PRESS  SHIFT" 
LOCK" 

271  POKE  KY,  254:  IF  PEEK  (KY)  =  254  THEN  271 
280  FOR  I  =  1  TO  30:  PRINT:NEXT  I 

290  WD  =  WI:WF  =  Wl:WI  =  (12-WI)/2 

291  ME  =  54060-ME*32 

300  FOR  M=  1  TO  LP;  GOSUB  600:  GOSUB  500: 

ML  =  ML+1:NEXTM 
350  WI  =  WI-1 
370  IF  WI  4  THEN  300 
400  FOR  M  =  1  to  LP:  GOSUB  600:  GOSUB  500: 

ML  =  ML+1:NEXTM 
450  WI  =  WI+1 
470  IFWIWDTHEN400 
490  GOTO  300 

500  RN  =  RN  +  SM*RND(!>-MS 
510  WT  =  WT  +  SGN(RN) 

520  IFWI  +  WT.20THENWT  =  WT-1:RN  =  0 
530  IFWT-OORWT  =  OTHENWT  =  WT-1:RN  =  0 
540  IFWI<0THENWI  =  2 
545  IF  WI.8  AND  RND(1)<GU  THEN  POKE 
BS  +  WT+1  +  INT(WI*RND(1)),    240 
550  PRINT  SPG  (WT);  "XX";  SPG  (WI);  "XX" 
560  RETURN 
600  POKEY,  254 

610  IFPEEK(KY)  ^251  THEN  ME  =  ME-1KK=-1 
620   IF  PEEK  (KY)  =  253  THEN  ME  =  ME  +  1  :KK  =  1 
630   IFPEEK(KY)  =191  THEN  ME  =  ME  +  KK 
640   IF  PEEK  (ME)    32  THEN  700 
650  POKE  ME,  C 
660  RETURN 

700  IF  PEEK  (ME)  =240  THEN  GY  =  240 
705   IFGY=240ANDPKTHENKP  =  KP+1: 

GY  =  0:  GOTO  650 
720   PRINT  "YOU  BLEW  IT!" 
725   PRINT 
730   MI  =  ML*PL 


750  PRINT  "AFTER";  MI;"MILES" 
755  IF  PK  THEN  PRINT  "AND";  KP;  "KILLS" 
757  PRINT:  PRINT  "TOTAL  POINTS:"; 
INT(MH-4-»(l-PK)*MI  +  100*KP) 
760  GOSUB  1000 
810  GOTO  5000 

1000  IF  PK  THEN  WD  =  KP:  GOTO  1030 

1010  WD=:MIAVF 

1030  PRINT:  PRINT  "CONGRATULATIONS" 

1040  PRINT  "YOU  MAY  NOW  CALL" 

1045  PRINT  "YOURSELF" 

1050  PRINT:  PRINT" 

1060  IF  WD3  THEN  PRINT  "LITTLE";  GOTO  1200 

1070  IF  WD5  THEN  PRINT  "TENDER";: 
GOTO  1200 

1080  IF  WD12.5  THEN  PRINT  "MEDIOCRE";: 
GOTO  1200 

1099  IF  WD25  THEN  PRINT  "BIG";:  GOTO  1200 

1 100  IF  WD.38  THEN  PRINT  "MASTER";: 
GOTO  1200 

1110  IF  WD-SO  THEN  PRINT  "GRAND";: 

GOTO  1200 
1120  PRINT  "CHEATER" 
1200  PRINT  "FOO" 

1210  IF  GY  =  240  THEN  PRINT  "KILLER!" 
1220  PRINT"!" 
1230  RETURN 

5000  PRINT:  PRINT:  PRINT  "PRESS  SHIFT  LOCK" 

5001  PRINT:  INPUT"AGAIN";  A$:  A$=  LEFr$ 
(A$,l) 

5010   IF  A$."Y"  THEN  6000 

5020  INPUT  "SAME";  A$:A$=  LEFT$(A$,1) 

5025  IF  A$."Y"  THEN  CLEAR 

5030  GOTO  100 

6000  END 

^  SOFTWARE  FOR  OSI 

^  VIDEO  GAMES  1 SIS. 

iw  Three  Games.  Head-On  is  like  the  popular  arcadegame.  Tank 

"V*  Battle  is  a  tank  game  for  two  to  four.  Trap!  is  an  entianced 

>j  blockade  style  game. 

jy  VIDEO  GAMES  2 S15. 

y^  Ttiree  games.  Gremlin  Hunt  is  an  arcade-style  game  for  oneto 

jj  thiree.  Gunfighit  is  a  duel  of  mobile  artillery.  Indy  isaracegame 

T^  for  one  or  two. 

M    ADVENTURE:  HflAROONED  IN  SPACE  S12. 

>-.  An  adventure  ttiat  runs  in  SKI  Save  yourship  and  yourself  from 
v^    destruction. 

■^     DUNGEON  CHASE S10. 

K,  A  real-time  video  game  wtiere  you  explore  a  tvi^enty  level 
i*    dungeon. 

S^  BOARD  GAMES  1 SIS. 

J-  Two  games.  Mini-gomoku  is  a  macfiine  language  version  of 

t*  five  stones  gomoku.  Cubic  is  a  3-D  tic-tac-toe  game.  Both  with 

>j  graphics- 

^      DISASSEMBLER S12. 

''^     Use  this  to  look  at  the  ROMs  in  your  machine  to  see  what 

^     makes  BASIC  tick.  Reconstruct  the  assembler  source  code  of 

machine  language  programs  to  understand  how  they  work. 

-^     Our  disassembler  outputs  unique  suffixes  which  identify  the 

j^^     addressing  mode  being  used,  no  other  program  has  this! 

SUPER!  BIORHYTHMS S1S. 

■^     A    sophisticated    biorhythm    program    with    many    unique 
.  features. 

Mm 

W     CI  SHORTHAND S12. 

f  Use  only  two  keys  to  enter  any  one  of  the  BASIC  commands 
\  "fi  A  °'  keywords.  Saves  much  typing  when  entering 
^MB^te.li  Programs.  Written  in  machine  language. 

^^^^^^IB      I..'  Lill  UASIC  fn-f^OM  -lysli'inEi    ^Flpfili.T- prt>rjr,inis  .-^v.lilable 
^^^m  W     Dfi  {ji'.k    Cole*  .iiK?  patina  iin  vidt^c  game? 

3**,  Send  for  FREE  catalog 

Jfi^C\  R  I  n  M  ^^''TWARE  ASSO. 

"W^^XJ  n  I  \J  Im  147  Main  St.  Ossining.  NY  10562 
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A  Fast  Visible 
IVIemory  Dump 

Martin  J.  Cohen,  Ph.D. 
Los  Angeles,  CA 

"The  MTU  Visible  Memory  is  8K  bytes  of  dynamic  RAM 
which,  during  refresh  (transparent  to  the  6502),  generates 
a  video  image  of  itself  .  The  320  (horizontal)  by  200 
(vertical)  pixel  display  allows  you  to  generate  moderately 
high  resolution  graphics.  (64,000  individual  pixeLs  can 
be  set  on  or  off —  obviously  a  job  for  6502  machine 
language  or  routines  callable  by  BASIC.)" 

This  description  {on  page  104  of  COMPUTE!, 
issue  7,  Nov./Dec,  1980)  begins  Dr.  Frank  Covitz's 
article  in  which  he  gives  a  truly  ingenious  method 
of  using  Commodore's  2022  tractor-feed  printer  to 
produce  a  hard  copy  of  the  MTU  Visible  memory. 
The  primary  disadvantage  of  this  method  is  that, 
because  the  2022  was  not  designed  for  graphics 
output,  the  process  can  take  10  to  30  minutes. 

The  6502  machine  language  program  de- 
scribed here,  called  SDUMP,  produces  a  hard  copy 
of  the  Visible  Memory  on  Integral  Data  Systems' 
"Paper  Tiger"  printers  with  DotPlot  graphics. 
Because  these  printers  have  graphics  built  in,  the 
Visible  Memory  can  be  dumped  in  90  seconds  on 
any  Paper  Tiger  and  in  only  45  seconds  on  the 
Paper  Tiger  460  run  at  9600  baud.  These  times 
apply  to  any  contents  of  the  Visible  Memory,  no 
matter  how  complicated  or  dense.  The  routine 
SDUMP  does  not  even  take  advantage  of  clear 
areas  of  the  Visible  Memory,  and  could  presumably 
be  speeded  up  if  this  were  done. 


GRAPHICS   NODE    I 


\         A       /        ,,, 


To  see  some  of  the  capabilities  of  the  Visible 
Memory/Paper  Tiger  combination,  examine 
figures  1  through  3.  Figure  1  shows  four  of  the 
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Figure  1 
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cn€nT€-n-Bns€ 

Cfi€flT€-fl-BflS€  is  Q  data  base  file  monQgement 
system  that  enobles  tins  user  to  choose  the 
number  of  fieids  needed  in  o  File,  ond  odd  or 
delete  Fields  uiith  out  disturbing  ony  oF  the  ex- 
isting data.  Once  q  file  is  created  you  con  perform 
ony  oF  30  Functions.  Such  qs: 

•  Interoct  uuith  UJORDPRO  4,  and  4  + 

•  Do  mothematic  functions  on  ony  2  or  more 
Fields 

•  Sort  650  files  in  only  19  seconds 

•  Merge  any  sequentlol  file  into  Q  CR€flT€-fl- 
BftS€  file,  and  output  o  sequential  File  From 
o  Cfl€RT€-fl-BRS€  file. 

•  The  report  generator  has  the  Feature  oF 
user  deFined  Fields  and  Field  ujidth. 

•  Printouts  can  be  generated  by  values  such 
OS,  greater  thon,  less  thon,  equal  to  or  in 
alpho  or  numeric  codes. 

Vou  don't  have  to  be  a  programmer  to  operate 
Cft€flT€-n-BflS€  on  your  COMMODOR6  computer. 
It's  menu  driven  and  asks  you  questions  at  each 
step  as  you  perForm  any  oF  Its  many  functions. 


\viHrii-i:Hii:i:i: 

UUORDCHeCK  is  o  poor  spellers  dream  come  true. 
Designed  to  interact  uuith  UJORDPRO,  it  hos  2100 
root  uuords  and  suffixes.  In  addition  For  the 
business  ond  scientiFic  user  it  has  the  capacity  For 
900  industriol  or  scientific  terms  uuhich  you  load  in 
yourself.  Vou  have  o  total  vocobulary  oF  approx- 
imately 7500  uuords  at  your  Fingertips.  It  simply 
goes  through  the  text  and  Flags  any  uuords  that  it 
doesn't  recognize. 

LLJORDCH6CK  is  ideal  for  doctors,  laiuyers  ond 
onyone  else  doing  technicol  ujriting.  UJORDCH6CK 
is  so  simple  to  learn  to  use  your  secretary  can  be 
uiorking  Luith  it  in  a  matter  of  minutes. 
Vour  uuorries  are  over!  No  more  scrambling  for  the 
dictionory  uihcn  you  have  to  uurite  "fluorescent", 
"nucleotide"  or  "receive".  ULJORDCH€CK  does  the 
ujork  for  you  quickly,  thoroughly  and  occurotely. 


Micro  Computer  Industries  Ltd, 


ix. 


1520  E.  Mulberry.  Suite  170  Fort  Collins,  CO    80524 


1-303-221-1955 
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Figure  2 
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screens  produced  by  the  demonstration  program 
supplied  with  the  visible  Memory.  Figures  2  and  3 
show  some  intermixed  text  and  graphics  produced 
using  the  MTU  Keyword  Graphics  Package,  of 
which  I  am  the  principal  author.  This  package 
interfaces  with  BASIC  to  allow  graphics  commands 
to  be  entered  as  part  of  your  BASIC  program. 
Listing  1  shows  the  code  used  to  produce  the  plots 
in  figures  2  and  3. 

The  principal  problem  in  dumping  the  Visible 
Memory  to  the  Paper  Tiger  is  that  a  byte  of  the 
Visible  Memory  is  displayed  as  8  pixels  lined  up 
horizontally,  while  a  byte  output  to  the  Paper 
Tiger  in  graphics  mode  produces,  depending  on 
the  model,  6  or  7  dots  lined  up  vertically.  The 
main  task  of  SDUMP  is  therefore  to  take  6  or  7 
bytes  in  the  Visible  Memory  which  are  lined  up 
vertically  and  convert  them  to  8  bytes  of  6  or  7  bits 
which  will  then  be  output  to  the  Paper  Tiger. 

My  first  attempt  at  this  was  done  in  BASIC, 
and  is  in  listing  2.  I  knew  it  would  execute  extremely 
slowly,  but  it  would  be  much  easier  to  debug.  Once 


the  code  was  working,  it  was  a  fairly  straightforward 
matter  to  translate  the  BASIC  into  assembly  lan- 
guage —  since  I  knew  the  logic  was  correct,  I  only 
had  to  make  sure  the  translation  was  correct. 
Another  advantage  of  this  method  is  that  if  I  want 
to  program  the  routine  in  some  other  language, 
such  as  PASCAL,  FORTH,  or  FORTRAN,  it  will 
be  much  easier  to  do  it  with  BASIC  as  the  basis 
instead  of  assembly  language. 

The  current  version  of  SDUMP  is  in  listing  3. 
It  is  a  modularized  form  of  the  BASIC  code  in 
hsting  2,  and  is  designed  to  be  easily  modifiable.  It 
is  assembled  starting  at  .|6000  (hex),  so  that  it  can 
reside  in  memory  with  the  MTU  Keyword  Graphics 
Package,  and  be  called  with  a  SYS  (96*256). 

The  initial  part  of  SDUMP  contains  a  transfer 
vector  and  a  data  area.  The  transfer  vector  has 
jumps  to  the  three  main  routines  in  SDUMP: 
OUTVM,  which  dumps  the  whole  Visible  Memory; 
OUTROW,  which  dumps  6  or  7  rows  of  the  Visible 
Memory  starting  at  the  location  set  in  V  M  (at 
$6013);  and  OUTCOL,  which  outputs  d  column  of 
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Standard  Features: 

•  Full  power  to  PET/CBM  for  a  minimum  of 
15  minutes 

•  Installs  within  PET/CBM  cabinet 

•  No  wiring  changes  necessary 

•  Batteries  recharged  from  PET/CBM  inte- 
gral power  supply 


Specifications: 

•  Physical  Size:    5.5"  x  3  6"  x  2  4" 

•  Weight:   4  5  lbs 

•  Time  to  reach  full  charge:    16  hours 

•  Duration  of  outputs;   Minimum  of  15  min. 

•  Voltages:    +16,  +9,  -12,  -9 

•  Battery  Life  Expectancy:    3  to  5  years 

•  Battery  On-Off  Switch 


For  Use  With: 

•  Commodore  PET/CBM  2001  and  4000  ser^ 
ies  computer 

•  Commodore  PET/CBM  8000  series  com- 
puter (screen  size  will  not  be  normal  on 
battery  back-up) 

•  Commodore  C2N  Cassette  Drive 


BATTERY 

BACKUP 

SYSTEIVL 


FOR  COMMODORE  PET/CBM  COMPUTERS 


Never  again  lose  valuable  data  because  of 
power  shortages  or  line  surges.  BackPack  sup- 
plies a  minimum  of  15  minutes  reserve  power  to 
32K  of  memory,  the  video  screen  and  tape 
drive,  BackPack  fits  inside  the  PET/CBM 
cabinet  and  can  be  installed  easily  by  even  the 
novice  user.  BackPack  is  recharged  during  nor- 
mal operation  and  has  an  integral  on-off  switch. 

BackPack  comes  fully  assembled  and  tested. 
Instructions  included. 


Backpack  is  a  trademark  oi  ETC  Corporation 
CBM/PET  are  trademarks  of  Commodore  Business  Machines 


Designed  and  manufactured  by: 

ELECTRONIC  TECHNOLOGY  CORPORATION 

P.O.  Box  C,  Old  N.C.  42 

Apex,  North  Carolina  27502 

Phone:  (919)362-4200  or  (919)362-5671 


Electronic  Manufacturing 

Technical  Design  and  Development 

Compute--  System  Technology 


IIIIIHIIHHIIIIHIHIIIII 


ELECTRONIC  TECHNOLOGY  CORPORATION 
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Figure  3 
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8  bytes,  6  or  7  bits  high.  These  routines  are  made 
available  in  this  manner  in  case  you  would  like  to 
mix  text  and  graphics  in  a  more  sophisticated 
manner  than  a  simple  dump. 

Following  the  transfer  vector  is  the  data  area. 
The  values  here  specify  how  the  Visible  Memory  is 
to  be  dumped  and  where  it  is.  SDUMP  is  assembled 
to  work  with  the  460  Paper  Tiger,  but  by  making 
the  changes  described  in  lines  25-27,  the  code  will 
work  on  the  Paper  Tiger  440.  Presumably,  with 
similarly  minor  changes,  SDUMP  will  also  work  on 
the  newest  Paper  Tiger,  the  445. 

The  following  should  be  noted  about  SDUMP 
and  its  use:  The  only  code  in  SDUMP  that  is 
specific  to  a  particular  version  of  BASIC  is  that  in 
OUTCH,  lines  235-280.  This  code  was  given  to  me 


by  Greg  Yob  —  thanks  Greg.  It  output;;  the  charac- 
ter in  the  ACC  directly  to  the  device  whose  number 
is  in  RDEV,  at  location  $600E  in  the  data  area. 
Because  this  code  bypasses  the  PET's  file  system 
and  directly  accesses  the  IEEE-488  routines,  the 
device  does  not  even  have  to  be  opened. 

Each  routine  in  SDUMP  checks  to  see  if  the 
stop  key  is  pressed,  using  the  routine  STOPTS  at 
lines  281-292.  If  so,  the  routine  quits  and  returns 
to  the  routine  which  called  it.  Because  of  the  way 
the  Paper  Tigers  enter  and  exit  graphics  mode,  it  is 
possible  for  them  to  be  left  in  graphics  mode  when 
the  stop  key  is  pressed.  If  this  happens,  you  will 
know  it  when  it  does,  the  easiest  method  of  recov- 
ering is  to  turn  the  printer  off,  then  on. 

You  should  not  have  a  CMD  operation  open 
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DR.  DALEY'S  BEST  MaOing  List  Is  Now  Better! 


DR.  DALEY  has  taken  his  best  selling  mailing  list  and  made  it  even  better!  This  version  has 
been  totally  revised  to  increase  the  reliability  of  the  files  and  make  it  even  easier  to  operate. 
Several  new  features  have  been  added: 


•  Goof-proof  input  routine.  Eliminates  the  irritating  resuhs  of  accidentally  pressing 
some  cursor  control  keys.  This  is  a  machine  code  routine  so  it  is  as  fast  as  you  are! 
BONUS — Auto  repeat  on  all  keys! 

•  Interface  to  allow  output  of  the  entire  mailing  list  or  virtually  /INy  subset  to  WORD- 
PRO III  and  WORDPRO  IV  format  files  so  you  can  use  these  to  generate  personal- 
ized form  letters.  YOU  can  format  the  structure  of  this  output! 

•  Routines  to  merge  files  and  to  minimize  the  number  of  duplicate  entries  in  a  file. 

•  More  machine  code  routines  to  speed  up  processing. 

•  In  addition  you  have  the  same  powerful  file  formatting  options  where  YOU  can 
determine  the  structure  of  the  files,  YOU  can  format  your  label  output  with  up  to  1 1 
lines  per  label  and  from  1  to  8  (yes  EIGHT)  labels  per  line. 


This  system  is  completely  menu  driven.  It  includes  100  pages  of  user  documentation.  This 
documentation  is  for  the  end  user  and  is  not  padded  with  listings,  flow  charts,  and  other  such 
extraneous  material. 

This  program  will  be  available  for  a  short  time  at  the  introductory  price  of  $159.95.  It  is 
available  for  the  32K  PET  and  CBM  3000,  4000  and  8000  series  computers.  You  can  order 
through  your  dealer  or  directly  from  us.  Wc  will  accept  VISA  or  MASTERCARD  or  your  check 
or  money  order.  Overseas  orders  include  10%  to  cover  shipping. 


Charge  to 

your 

MC/VISA 


VISA 


DR.  DALEY'S  Software 

425  Grove  Avenue,  Berrien  Springs,  MI  49103 

Phone  (616)  471-5514 

Sunday  -  Thursday  noon  to  9  p.m.,  Eastern  Time 
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4000 
4005 
4010 
4060 
4070 
4090 
4100 
4110 
4120 
4130 
4140 
4150 
4160 
4Z10 
4ZZ0 
4300 
4310 
4320 
4330 
4335 
4340 
4330 
4460 
4490 
4495 
4500 
4510 
4SZ0 
4530 
4590 
4592 
4594 
4600 
4610 
4620 
4630 
4640 
4650 
4660 
4670 
4630 
4690 
4700 
4702 
4705 
4710 
4715 
4720 
4725 
4730 
4735 
4737 
4740 
4745 
4750 
4752 
4755 
4760 
4900 
4910 
4920 
4930 
4940 
4950 


NX  WIDE,  y  IN  (YA.STB)  NY  HIGH,  XEY  PK 


POINTS 


FOR 
FOR 


PI 

PI 


DENS  DIST 
CUM  DIST 


REM  PLOT  X  IN  (XA,XB> 

IF  PF=0  THEN  RETURN 

CLEAR 

CX=NX/ aB-XA) :HEM  CONVERSION  CONSTANTS 

CY=NY/(yB-YA) 

FOR  JR=1  TO  NR:REM  GET  THE  DATA 

DOTL  D0( JR, 1) ,D0( Jfl, 2> 

FOR  JQ=1  TO  NO 

X=QS( JQ) 

IX=INT( . 5+(X-XA)«CX) 

IF  IX<0  THEN  IX=0:REM  MAKE  SURE  X  OK 

IF  IX>NI  THEN  IX=NX 

IX=IX+OX 

IF  PK=1  THEN  Y=DD( JO, JR) ;REM  PK=1 

IF  PK=2  THEN  y=CD( JQ , JR ) : REM  PK=2 
REM  CONVERT  Y  LIKE  X 

IY=INT( . 5+(Y-yA)*CY) 

IF  IY<0  THEN  IY=0:REM  FORCE  ON  PLOT 

IF  iy>NY  THEN  IY=Ny 

I Y=IY+D¥ 

IF  J0=1  THEN  MOVE  IX, lY 

DRAW  IX, I Y 

NEXT  JQ 

NEXT  JR 

DOTL  1,0 

REM  PRODUCE  THE  PLOT 

MOVE  OX ,QY: REM  BORDER 

DRAW  OX+NX,0¥:DRAW  OX+NX,OY+NY 

DRAW  OX ,DY+N¥: DRAW  OX , 0¥ 

MOVE  OX+NX/2-3*<LEN<PLS )+6) ,Oy+NY+10 

CHAR  PL$;"  VS.  Q" 

FLS="" 

REM  DISPLAY  RHO  AND  DOTS 

IX=:OX+NX  +  10  .  IY  =  0Y+NY-7 
MOVE  IX,  lY: CHAP  "RHO 
FOR  1=1  TO  NF 
V=RS(I ) :COSUB2002 

!y=IY-lZ:MOVE  IX 

CHAR  V« 

DOTL  D0( I  , 1)  ,D0(  I 

NEXT  I 

DOTL  1,0 

REM  DRAW  A  GRID 

TL=3:REM  TIC  LENGTH 

DX=.1:REM  X  CHID  SPACING  (ALWAYS) 

DY=iO:REM  ¥  SPACING  -  HAVE  TO  SEARCH 

IF  YB/5<DY  THEN  DY  =  DY/ I  0 : COT04 7 15 

EX=1NT{XB/DX+. 01) :E¥=INT( YB/DY+. 01)  REM  POINTS  ON  GRID 

FX=1:IF  £X>5  THEN  FX=2:IF  EX>10  THEN  FX=5:ir  EX>20  THEN  FX=lfl 

FY=1;IF  EY>5  THEN  FY=2:1F  Ey>10  THEN  ry=5;IF  EYJZO  THEN  Fy=10 

FOR  1=0  TO  E¥:OZ=0Y+I*DY*CY:LINE  OX-TL , 02 , OX+TL , OZ : REM  Y  AXIS 

LINE  OX+NX-TL,0Z,0X+NX+TL,0Z 

IF  I=FY*INT( I/FY)  THEN  CHROT  1 . MOVE  OX-TL-5 , OZ- 3 : CHAR  MID5(STI 

NEXT  I 

FOR  1=0  TO  EX:OZ=OX+I*DX«CX:LINE  OZ , OY-TL , OZ , OY +TL : REM  X  AXIS 

LINE  OZ,OY+N¥-TL,OZ ,Oy+N¥+TL 

IF  I=FX«INT( I/FX)  THEN  CHROT  0 : MOVE 

NEXT  I 

REM  PRODUCE  THE  PLOT 

PRINT: PRINT 

CMD3:REM  REGULAR  OUT 

SyS(LP) . REM  THERE  IT 

CMDl :REM  BACK  TO  THE 

RETURN 


CURVE' 


lY 


2):LINE  IX  +  42,  IY+3, 319, iy+3 


OZ-3,OY-TL-10;CHAR  MIDS(STRS< I«DX) ,2) 


TO  THE  SCREEN 

GOES 

PRINTER 


Listing  1 


to  the  Paper  Tiger  when  SDUMP  is  called,  because 
of  the  way  this  command  is  interpreted  in  the 
IEEE-488  system.  To  avoid  this,  open  a  unit  to  the 
screen  (device  3)  and  switch  to  this  unit  before 
invoking  SDUMP.  For  example: 

OPEN  1,4:REM  PRINTER  FILE 
OPEN  2,3:REM  SCREEN  FILE 
CMD  1:REM  OUTPUT  TO  PRINTER 


CMD  2: REM  DIVERT  OUTPUT 
SYS(96*256):REM  DUMP  VISIBLE  MEMORY 
CMD  1:REM  RESUME  PRINTER  OUTPUT 

The  byte  in  the  data  area  called  EORV  AL  (at 
$601 1)  is  exclusive-ored  with  each  Visible  Memory 
byte  when  it  is  accessed  for  dumping.  Tliis  gives  a 
visible  indication  of  the  progress  of  the  dump 
which  I  find  entertaining.  It  is  actually  an  instance 
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Third  Generation 
Business  Application  Software 

Fully  guaranteed,  unprotected,  sell  to 
end  users  as  many  times  as  you  desire 


Micro  Management 

Micro  Management 

Independent  Micro 

Information  System 

Information  System 

Management  System 

For  Service  Firms 

For  Retail/Wholesale 

Components 

Firms 

Components 

General  Ledger 

General  Ledger 

General  Ledger-$600 

Accts.  Receivable 

Accts,  Receivable 

Accts.  Receivable-$500 

PayroH 

Accts.  Payable 

Accts,  Payable 

Accts.  Payable-$200 

Cash  Flow  and 

Inventory  Control 

lnventory-$550 

Contribution  Margin 

With  Safety  Stock 

Budgeting  By  Dept. 

Feature 

Trial  Balance, 

Cash  Flow  and 

Financial  Reports 

Contribution  Margin 

Payroll  $400 

and  Much  More 

Budgeting  by  Dept. 
Point  of  Purchase 
Invoicing,  Trial 
Balance,  Financial 
Reports  and  Much 
More 

Total  Price: 

Total  Price: 

$2,500.00 

$2,500.00 

All  programs  are  available  using  CBM  8032/8050  equipment.  Written  using  Relative 
File  Structure  (printer  no  factor). 


If  you  want  the  very  best  in  business  application  software,  call  us: 

The  Management  Accountability  Group 

MAG,  INC, 

P.O.  Box  346 

493  East  Clayton  St. 

Athens,  Georgia  30603 

(404)  353-8090 

We  believe  we  are  the  best  in  the  business,  If  you  are  serious  about  profits  for  your 
business  make  us  prove  it;  otherwise,  call  our  competition. 


MAg 


Merging  Computer  Technology 
with  the  practical  worlds 
of  Business  and  Government, 
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of  Cohen's  first  law  of  inter- 
active computing  —  "Always 
let  the  operator  know  that 
something  is  going  on." 
However,  this  leaves  the 
screen  reversed  when  the 
dump  finishes.  If  you  do  not 
like  this,  there  are  (at  least) 
two  possibilities:  (1)  Set 
EORVAL  to  zero  ($00);  the 
exclusive  or  will  than  not 
change  anything.  (2)  If  you 
are  using  the  Keyword 
Graphics  Package,  follow  the 
call  to  SDUMP  with  a 
'SCFLIP  0,0,319,199';  this 
will  reverse  the  whole  screen, 
restoring  its  original 
condition. 

To  load  SDUMP  togeth- 
er with  the  MTU  keyword 
Graphics  Package,  when 
reserving  memory  space,  do 
a  'POKE  53,96'  instead  of 
'POKE  53,98' for  a  32K 
system,  and  similarly  for 
smaller  systems.  This  will 
reserve  the  two  pages  needed 
by  SDUMP. 


Listing  2 


9100 
9110 
9120 
9130 
9140 
9142 
9145 
91S0 
9160 
9170 
9180 
9190 
9200 
9210 
9220 
9225 
9230 
9235 
9240 
9250 
9260 
9270 
9280 
3230 
929S 
9300 
9310 
9315 
3320 
9330 
9340 
9350 
9360 
9370 
9390 
9400 
9410 
9420 
9430 
9439 
3440 
9450 


REM  MTU  VISIBLE  MEMORY  TO  IDS  460  PAPER  TIGER  SCREEN  DUMP 
PRINTtUiREM  SPACE 

PRINT»U,CHRS (3) ; ;REM  ENTER  GRAPHICS  MODE 
VM=256*PEEKi832) ;REM  START  OF  VISIBLE  MEMORY 
PVMEK 
G  RBH  RT 

S=7:REM  ROWS  PER  CROUP 

FOR  R0=0  TO  199  STEP  S:REM  S  ROWS  AT  A  TIME 
R1=B0+S-1:REM  END  OF  ROW  GROUP 
IF  Rl>199  THEN  Rl=193 

FOR  C=0  TO  39: REM  A  BYTE  \B    BIT  COLUMNS)  AT  A  TIME 
FOR  1=0  TO  7: REM  CLEAR  VALUES  TO  BE  PRINTED 
;  Pd  )  =  0 
NEXT  I 

V=VM+C:REM  LOC  OF  BYTE 
P2=1:REM  POWER  OF  2  TO  ADD 
FOR  H=RO  TO  R1;HEM  SCAN  THE  ROWS 
PRINT  C;R 

B=FEEK(V) :REM  GET  THE  BYTE  (8  BITS) 
V=V+40:REM  LOC  OF  BYTE  BELOW 
IF  B=0  THEN  9315  REM  FASTER  IF  EMPTY 
M=l : REM  MASK  f 2a(7-I )) 
REM  ACCUMULATE  VALUES  FOR  PRINTING 
FOR  1=7  TO  0  STEP  -1 

:IF  (B  AND  M)<>0  THEN  P(I)=P(I)+P2 
.'  M  =  M  +  M 
NEXT  I 
P2=P2+P2 
NEXT  B:REM  DO  THE  ROWS 
REM  NOW,  PRINT  THE  B  COLUMNS  OF  ROWS 
FOR  1=0  TO  7 
:PRINT#U,CHRS(P(I) ) i 

:IF  P(I)=3  THEN  PRINT#U , CHRS ( P (I ) ) , : REM 
NEXT  I 

NEXT  C;REM  END  OF  COLUMN  LOOP 

PRINTiU,CHRS(3);CHRS(14) ; . REM  GRAPHICS  LINE  FEED/RETURN 
VM=VM+S*40 : REM  DOWN  S  ROWS 
NEXT  RO:REM  END  OF  ROW  GROUP  LOOP 
PRINT«U,CHRS(3) ;CHRS(2) ;REM  LEAVE  GRAPHICS  MODE 
II 

VISMEM 
RETURN: REM  DONE 


3  IS  SPECIAL 


Listing  3 

OOOOl 
00002 
O0O03 
00004 
OOOOS 
DDD06 
00007 

ooooe 

O0DO9 
00010 
OQOll 
00012 
00013 
00014 
0  0  015 
00016 
00017 
00013 
00013 
00020 
00021 
0  0  0  2  2 
00023 
00024 
OOO  25 
00026 
00027 
DOOZB 
O0OZ9 
00030 
00031 
00032 


0000 

oooc 

0000 
0000 
0000 
0000 
0000 
OOOD 
0000 
0000 
0000 
DOOD 
0000 
0000 
OOOO 
0000 
0000 
6OO0 
6000 
6003 
6006 
6  0  09 
6009 
6009 
6009 
6009 
6003 
6003 
6009 
600A 
600B 
600C 


4C  18  60 
4C  8D  60 
4C  DF  60 


14 
02 
iC 
07 


SDUMP  ASM  -  MTU  TO  IDS  PAPER  TIGER  460  (440)  SCREEN  DUMP 

BY  MARTIN  J.  COHEN,  DECEMBER  1930 

ANYONE  WHO  WANTS  TO  CAN  USE  THIS  PROGRAM, 
ALTHOUGH  SOME  ACKNOWLEDGEMENT  WOULD  BE  APPRECIATED 

APPROXIMATE  TIME  NEEDED  TO  DUMP  VISIBLE  MEMORY: 

AT  1200  BAUD,  1  MIN,  30  SEC 

AT  9600  BAUD,  45  SEC  (WITH  3  MS  DELAY  SET  BY  NMSDLi;,  BELOW) 

THE  ACTUAL  CPU  TIME  NEEDED  IS  ABOUT  3  SECONDS! ! 


*    =  $6000 

JMP  OUTVM 

JMP  OUTROW 

JMP  OUTCOL 


;  TWO  PAGES  BELOW  KGP  CODE 

SKIP  DATA  AREA  AND  DUMP  THE  VIS  MEM 
OUTPUT  ROW  STARTING  AT  VM 
OUTPUT  A  COLUMN  OF  8  BYTES 


DATA  AREA 

NOTE  -  TO  RUN  THIS  ROUTINE  ON  A  440  INSTEAD  OF  A  4r.0, 
CHANGE  THE  FOLOWING  VALUES  AS  INDICATED  (VALUES  IN  DECIMAL): 
RPFXC=0,  RREP  =  33,  RVAL  =  G  ,  HEND=2,  RXGR=11. 


RPFXC  .BYTE  20 

RPFXR  . BYTE  2 

RREP  .BYTE  28 

RVAL  . BYTE  7 


NUMBER  OF  BLANK  PREFIX  COLUMNS  (440:0) 
NUMBER  OF  BLANK  PREFIX  ROWS 
MAIN  REPETITION  COUNT  (440:33) 
ROWS  TO  OUTPUT  IN  MAIN  LOOP  (440  6) 
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NEW  LIFE  for  old  Pets  ? 

Is  it  a  dream  ...  is  it  fantasy? 


Switch  from  old  ROMs  to  new 

•  Not  sure  about  the  ROM  Retrofit  Kit  from  Commodore?  Now  you  can  use  all  three  sets  of 
Commodore  ROMs  and  others  as  well. 

•  The  Basic  Switch  allows  switch  selection  of  either  ROM  set  (you  r  orig  inal  sel  or  your  retrofit  set) 
from  Com modore.  Plus,  Models  1 5-A  and  1 5- B  include  a n  additional  zero  insertion  force  socket 
allowing  easy  use  of  ROMs  like  the  BASIC  Progra  mmer's  Toolkit ...  concurrently. 

•  Models  1 5-A  and  1 5-B  The  Basic  Switch  plus ...  includes  expanded  cable  assembly  and  zero 
insertion  force  socket  Your  1 5th  ROM  simple  plugs  in ...  enabled  while  either  ROM  set  is  selected 
Socket  1 5  may  be  readdressed  by  the  user  for  additional  flexibility. 

•  The  Basic  Switch  is  sold  in  assembled  form  only.  All  models  are 
designed  for  easy  attachment  to  your  PET  with  a  convenient  cable 
assembly.  Mo  soldering  or  drilling  is  required.  The  Basic  Switch  mate! 
with  a  cable  assembly  at  your  primary  board,  and  does  not  use  the 
physical  connectors  of  any  PET  ports. 

Price  List 

Old PETs  SI 29.95* 

New PETs  SI 39.95* 

•Case  optional,  S 1 5  additional. 

Our  prices  and  complete  product  specifications  are  available  by 
contacting  APPLI  ED  MICRO  SYSTEMS,  MIshawaka,  Indiana;  or  any 
Commodore  Dealer. 


Dealer  Inquiries  are  encouraged. 

Free  MACHINE  UKNGOAGE  MONITOR  COMMANDS  Ust 

will  be  included  with  pricing  and  product  specification  requests. 


COMPUTEl's  Book  Corner 

Back  Issues: 

COMPUTE!  January,  1981.  Issue  8 S2.50  D 

COMPUTE!  February,  1981,  Issue  9  S2.50  D 

COMPUTE!  March,  1981,  Issue  lO  $2,50  D 

For  The  Single  Board  Computer  Owners: 

(KIM,  SYM,  AIM,  OSI) 

COMPUTE  H,  All  Three  Issues 

(The  only  ones:  COMPUTE  II  merged  into  COMPUTE!) 

Issues  1 2,  and  3 S5.00  D 

Individual  issues 

COMPUTE  11.  #1 $2.00  n 

COMPUTE  ii,  #2  $2.00  O 

COMPUTE  11,  #3  S2.00  □ 

Miscellaneous: 

Best  oHhe  PET  Gazette  SIOOO  D 

(Note... an  old  anthology  primarily  for  old  ROtv/l, 
8K  original  PETs.) 

Collected  PET  User  Nofes  (7  issues)  $10.00  D 

(Above  note  applies) 

Collected  6502  User  Notes  (17  issues)        .$20.00  D 
(Specifically  for  Single-Board  Computer  Owners) 

Ordering  information: 

Address  orders  to: 

Compute's  Book  Corner 

P.O.  Box  5406 

Greensboro,  NC  27403  USA 

Poyment,  in  US  funds,  required  with  order.  "Master  Charge/ 

VISA  accepted.  All  items  subject  to  availobility.  Please  add 

the  following  amount(s)  for  shipping/handling: 

US  S2.O0  (UPS  or  mail)    •    Canada  S2.00  (mail) 
Foreign  Air  Mail  S5,00 


fipPLiED  miCRD  avsTEms 


3502  Home  Street.  Mishawaka,  Indiana  46544 
I-2J9-259-3787  (Indiana)  •  1-800-348-7208 


The  $180  Programmable 
character  generator  that 
performs  above  and 
beyond  its  price. 

It's  ttie  NEW  HAL  FOG  6500  tor  your  PET,  Wi!h  HAL. 
you  control  each  dot  in  ttie  8x8  matrix  so  you  get 
sharp,  clear  graphics.  HAL  otters: 


Inlertace  lo  PET/CBM  wilh 
24  pin  character  generator 
ROMS  {II  your  PET  uses  2a 
pin  ROMS.  Conversion  Kils 
are  available  lor  S45  To 
simplify  ordering,  please 
indicate  memory  RAM 
s21Mor"6550) 


•  Storage  for  64  user- 
programmable  characters 

•  Built-in  CB2  sound  amplifier 

■  PCG  Manual  and  demo 
program 

The  HAL  PCG  6500  is  amll- 
able  exclusively  et  Systems 
Formulate. . . 

Call  today  lor  more  inlormaiion  or  to  place  your  phone  order: 
(415)  326-9100     39  Town  &  Courtlry  Village,  Palo  Alto,  CA  94301 
We  hanoT  Mazier  Chaiyv.  Vtsa,  Check  or  Mon«y  Qnfer  f  CaHlDrnlB  reildenls 
add  EVi'^  sa/as  tax) 

Dealer  Inquiries  Invited 


(ivt)  SYSTEMS  FORMUtATE  CDRPORATION 

V       ^  WTm>*CaidITVIII«»F>liiAlU.C4UlbmUB«»l 
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00033 
00034 
00035 
00036 
00037 
00D3S 
FLIP, 
00039 
D0D4D 
O0O4I 
00042 
00043 
0DD44 
00045 
00046 
0D047 
00048 
00049 
O0O50 
00051 
O0O5Z 
00053 
OD054 
00055 
0D05S 
00057 
0003S 
00059 
00060 
00061 
00D6Z 
00063 
00064 
00065 
00066 
00067 
00066 
00069 
00070 
0  0  0  71 
00072 
00073 
D0074 
00075 
O0O76 
00077 
00078 
00079 
00080 
00081 

oooez 

00083 
00084 
00085 
00066 
00087 

oooee 

00039 
00090 
O0O91 
0009^ 
D0O93 
00094 
O0O9S 
00096 
O0O97 
00098 
O0O99 
DDIDD 
00101 
OOIOZ 
00103 
00J04 
00105 
00106 
00107 
00108 
00109 


04 


04 
OE 
03 
FF 


600D 
600E 

GOOE 
600F 
6010 
601  1 
0  TO  SKIP 
6012  90 
6013 
6013 
6015 
6016 
6017 
6018 
6018 
6018 
6  018 
601B 
601E 
6020 
6023 
6026 
6029 
602C 
602F 
6031 
6034 
6035 
6037 
6037 
6037 
6D3A 
603C 
603F 
6042 
6045 
6048 
604B 
604E 
604F 
6052 
6055 
6058 
605B 
605D 
6060 
6061 
606  3 
6063 
6066 
6068 
606S 
606S 
606E 
6070 
6073 
6076 
6076 
6079 
607C 
607D 
607D 
6  0  7D 
607D 
607F 
6082 
6084 
6087 
6086 
6  0  88 
6088 
6088 
6D8A 
603D 
608D 
6D8D 
608D 
6  0  90 


REND 


BYTE  4 


ROWS  TO  OUTPUT  AT  END  (440:2) 


THE  TOTAL  NUMBER  OF  HOWS  OUTPUT  =  RREP*RVAL  +  REND 


ZOO 


00 
28 
00 
DO 


AD 
80 
A9 
BD 
AD 
8D 
20 
AE 
FO 
20 
CA 
DO 


20 
BO 
20 
AD 
SD 
20 
20 
AE 
18 
AD 
60 
8D 
AD 
69 
8D 
CA 
DO 

CE 
DO 

20 
AD 
FO 
SD 
20 

20 
20 
60 


A9 
20 
A9 
20 
60 


Ag 

4C 


AD 
8D 


00 


12 
14 
00 
13 
OB 
16 
88 
OA 
06 
C5 

FA 


BA 

3A 
Bl 
OC 
17 
3D 
C5 
OC 

13 

15 
13 
14 
DO 
14 

EB 

16 
CF 

Bl 
OD 

06 
17 
8D 

C5 
7D 


03 
60 
02 
6D 


03 
60 


13 
Dl 


60 

80 

60 
60 
60 
60 
60 

60 


61 

60 
60 
60 
60 
60 
60 

60 
60 
60 

6  0 

60 


60 


60 

60 

60 
60 

60 
60 


61 


61 


61 


60 
60 


RDEV  , BYTE  4 

HXGR  .BYTE  14 

NMSDLY  .BYTE  3 

EORVAL  BYTE  SFF 

VMPAGE  BYTE  S90 

VM  WORD  0 

BYTEPL  .  BYTE  40 

RREPX  BYTE  0 

RVALX  .BYTE  0 


OUTPUT  DEVICE 

GRAPHICS  RETURN  (440 • 11) 

MS  TO  DELAY  AFTER  EACH  BYTE 

VALUE  TO  EOR  VITH  SCREEN  LOC  (SFF  TO 

STARTING  PAGE  OF  VISIBLE  MEMORY 


LOCAL  STORAGE  -  LOC  OF 
BYTES  PER  VM  LINE 
STORAGE  FOR  REP  COUNT 
STORAGE  FOR  ROW  COUNT 


A  VIS  MEM  ROW 


OUTVM 


OUTPUT  THE  WHOLE  VISIBLE  MEMORY 


OUTVM   LDA  VMPAGE 
STA  VM+1 
LDA  «0 
STA  VK 
LDA  RREP 
STA  BREPI 
JSR  ENTRGR 
LDX  RPFXR 
BEQ  OUTVMl 

OUTVMO  JSR  OUTFET 
DEX 
BNE  OUTVMO 


OUTVMl  =  « 
JSR 
BCS 
JSR 
LDA 
STA 
JSR 
JSR 
LDX 
CLC 
LDA 
AOC 
STA 
LDA 
ADC 
STA 
DEI 
BNE 


0UTVM2 


STOPTS 

OUTVMr 

OUTPFX 

RVAL 

RVALX 

OUTROV 

OUTRET 

RVAL 

VM 

BYTEPL 

VH 

VM+1 

*0 

VM+1 

0UTVM2 


i  SET  LOC  OF  VM 


SET  MAJOR  REP  COUNT 

ENTER  GRAPHICS  MODE 
;  SEE  IF  ANY  PREFIX  ROWS 

;  IF  SO,  OUTPUT  THEM 


CHECK  FOR  STOP  KEY 

OUTPUT  A  LINE  P 
SET  ROW  COUNT 

OUTPUT  A  ROW 
OUTPUT  A  RETURN 
SET  VM  =  V«+RVAL*40 


DEC  RREPX 
BNE  OUTVMl 

JSR  OUTPFX 
LDA  REND 
BEQ  OUTVMF 
STA  RVALX 
JSR  OUTROW 
OUTVMF  =  » 

JSR  OUTRET 
JSR  EXITGR 
RTS 


COUNT  ROWS 


START  OF  LAST  ROW 
NUMBER  OF  ROWS 
,  SKIP  IF  NONE 

THERE  IT  GOES 


LEAVE  GRAPHICS  MODE 

DONE 


EXITGR 


LEAVE  GRAPHICS  MODE 


EXITGR  LDA  #3 

JSR  DUTCH 

LDA  »2 

JSR  DUTCH 
RTS 

',    ENTRGR  -  ENTER  GRAPHICS  MODE 

ENTRGR  LDA  «3 

JMP  DUTCH 

;  OUTROW  -  OUTPUT  THE  ROW  POINTED  TO  BY  VM ,  RVALX  DEEP 

OUTROW  LDA  VM  ;  SET  WHERE  TO  START 

STA  V 
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00 110 
OOIII 
00112 
D0I13 
00114 
00115 
O0116 
00117 
001  IB 
00119 
00120 
OOIZI 
00122 
00123 
00124 
00125 
00126 
O0127 

0  012  8 
001Z9 
00130 
00131 
00132 
00133 
00134 

001  35 
00136 
00137 
0D13B 
00139 
00140 
00141 
00142 
00143 
00144 
00143 
00146 
00147 
00148 
00149 
00150 
00151 
00152 
00153 
00154 
00155 
00156 
00157 
00158 
00159 
00160 
OOISI 

ooiez 

00163 
00164 
00165 
00166 
00167 
00168 
00169 
00170 
00171 
00172 
00173 
00174 
00175 
0017S 
00177 
00178 
00179 
O0180 
OOlSl 
00182 
00183 
O0184 
0  018  5 
00186 
0  018  7 


6093 
609G 
6099 
B09C 
609F 
60AZ 
fiOA5 
60A8 
6DAA 
60AD 
60AE 
6DB0 
60B1 
60B1 
60B1 
60B1 
60B4 
60B6 
60B3 
E06B 
60BE 
60Br 
60C1 
60C4 
E0C5 
60C5 
60C5 
6DC5 
50C7 
60CA 
6DCD 
60D0 
60D1 
GODl 
60D1 
BODl 
60D1 
60D1 
6DD3 
60D4 

eoDC 

60DC 

EODD 
6D0E 
60DF 
60DF 
60DF 
BODF 
6OE0 
60E1 
E0E2 
80E3 
60E4 
60E6 
60E7 
60E9 
60EA 
60ED 
60EF 
60F1 
60F3 
60F6 
6DF7 
60F9 
6DF9 
BDFB 
SOFE 

eio: 

6103 
E106 
6108 
610A 
610C 
610F 
6112 
6114 
6116 
6117 


AD 
8D 
AE 
AD 
BD 
20 
EE 
DO 
EE 
CA 
DO 
60 


AE 
FO 
20 
A9 
20 
CA 
DO 
20 
60 


AS 
20 
AD 
20 
60 


00 
DO 


00 
DO 
00 


48 
8A 
48 
98 
43 
A  5 
48 
A5 
48 
ZO 
BO 
A9 
A2 
9D 
CA 
10 

A9 

80 
AD 
35 
AD 
85 
AO 
Bl 
8D 
40 
91 
A5 
18 
6D 


14 
D2 
15 
17 

D3 

DF 
01 
03 
02 

EC 


09 
DE 
7D 
20 
GD 

FA 

88 


03 
6D 
OF 
6D 


00 


60 
60 
60 
60 
60 
60 
60 

GO 


60 


60 


61 


ED 


61 
60 
61 


01 
02 

BA 
72 
00 
07 
D4 

FA 

01 
DC 
Dl 
01 
D2 
02 
DO 
01 
DD 
11 
01 
01 


61 


60 


60 
BO 

BO 


BO 
60 


OUTRl 


0UTR2 


LDA  VM+1 
STA  V+1 
LOX  BYTEPE. 
LDA  RVALX 
STA  R 

JSF  OUTCOL 
INC  V 
BNE  0UTP2 
INC  V+1 
DEX 

BNE  OUTHl 
RTS 


DO  40  COLUMNS 
SET  DEPTH  COUNT 

OUTPUT  THOSE  8 
BUMP  LOG 


OUTPFX 


;  COUNT 
;  DONE 
OUTPUT  RPFXC  SPACES  TO  START  LINE 


OUTPFX  LDX  RPFXC 
BEQ  0UTFF2 
JSR  EXITGR 
LDA  #32 

OUTPFl  JSR  DUTCH 
DEX 

BNE  OUTPFl 
JSR  ENTRGK 

0UTPF2  RTS 


CHECK  FOR  NONE 

LOAD  THE  SPACE 
.  OUTPUT  IT 
UNTIL  DONE 


;  THAT'S  ALL 

.  OUTRET  -  OUTPUT  A  GRAPHICS  RETURN 

OUTRET  LDA  #3 

JSR  DUTCH 
LDA  RXCR 
JSR  DUTCH 
RTS 

OUTCOL  -  OUTPUT  8  COLUMNS  OF  BITS 

PARAMETERS  (BELOW)  ARE  V  AND  R 


V 
R 
PO 

P2 

B 

n 

PCZ 


.WORD  0 
. BYTE  0 

*  =  *  +  e 


.  BYTE 
.  BYTE 
.BYTE 

=  1 


OUTCOL  PHA 
TXA 


CLP2 


RLOOP 


15  BD 


PHA 
TYA 

PHA 

LDA  PGZ 

PHA 

LDA  PGZ+1 

PHA 

JSR  STOPTS 

BCS  MOVEPF 

LDA  «0 

LDX  »7 

STA  PCX 

DEX 

BPL  CLP2 

LDA  il 
STA  P2 
LDA  V 
STA  PGZ 

LDA  V+1 
STA  PGZ+1 
LDY  #0 

LDA  (pcz;y 

STA  B 

EOR  EDRVAL 

STA  (FGZ)Y 

LDA  PGZ 

CLC 

ADC  BYTEPL 


LOG  IN  VISIBLE  MEMORY 
NUMBER  OF  ROWS  TO  PROCESS 
RESULT  TO  OUTPUT 

POWER  OF  2  BIT 
STORAGE  FOR  A  BYTE 
A  MASK 

PAGE  ZERO  LOCATION  TO  USE 

SAVE  REGS 


SAVE  PAGE  ZERO  AREA 


SEE  IF  STOP  PRESSED 
IF  SO,  QUIT  NOW 
ZERO  P(0 : 7) 


SET  P2  TO  1 
STORE  VM  LOC 


GET  VM  BYTE 
SAVE  IT 
;  REVERSE  IT  FOR  SHOW 

POINT  TO  NEXT  ROW 
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Get  Fireworks  From 

4^      Your  PET!* 


*•■  V 


DUNGEON  OF  DEATH       CODE  NAME:  CIPHER 


TREK-X 

TREK-X  Command  the  Enterprise  as  you 
scour  the  quadrant  for  enemy  warships. 
This  package  not  only  has  superb  graph- 
ics, but  also  includes  programming  for 
optional  sound  effects.  A  one-player 
game  tor  She  PET  8K.  Order  No.  0032P 
$7.95. 


DUNGEON  OF  DEATH  Battle  evil 
demons,  cast  magic  spells,  and  accumu- 
late great  wealth  as  you  search  for  the 
Holy  Grail.  You'll  have  to  descend  into 
the  Dungeon  of  Death  and  grope  through 
the  suffocating  darkness.  If  you  survive, 
glory  and  treasure  are  yours.  For  the  PET 
8K.  Order  No.  0064P  57.95. 


ARCADE  I 

ARCADE  I  This  package  combines  an  ex- 
ciling  outdoor  sport  with  one  of 
America's  most  popular  indoor  sports: 
•Kite  Fight  -  It's  a  national  sport  in  India. 
After  you  and  a  friend  have  spent  several 
hours  maneuvering  your  kites  across  the 
screen  of  your  PET,  you'll  know  why! 
•  Pinball-By  far  the  finest  use  of  the 
PET'S  exceptional  graphics  capabilities 
we've  ever  seen,  and  a  heck  of  a  lot  of  fun 
to  boot. 

Requires  an  8K  PET.  Order  No.  0074P 
S7.9S. 


CODE  NAME:C1PHER 

Enjoy  that  same  feeling  o'  intrigue  and 
discovery  with  the  Code  Name:  Cipher 
package.  Included  are: 

•  Memory  Game  — Would  you  like  to 
match  your  memory  against  the  com- 
puter's? You  can  with  the  fylijmory  Game. 

•  Codemasler-One  player  types  in  a 
word,  phrase,  or  sentence,  and  the  PET 
translates  that  message  into  a  crypto- 
gram. The  other  player  must  break  the 
code  and  solve  the  cryptogram  in  the 
shortest  time  possible. 

•  Deceitful  Mindmaster  — Tftis  isn't  your 
ordinary  Mastermind-type  game.  You 
must  guess  the  five  letters  m  the  hidden 
code  word. 

•Code  Breaker- Cracking  this  code 
won't  be  as  easy  as  cracUng  walnuts. 
You'll  need  to  flex  your  mental  muscles 
to  win  ttiis  game. 

If  you  want  a  mental  challenge,  then 
Code  Name;  Cipher  is  for  you.  For  ttie  8K 
PET.  Order  No.  0112P.  $7.9S. 


Instant  Software 


U        'A  trademark  of  Commodore  Bui.ir.ess  (Vlachines 

PETERBOROUGH,  N.H.  03458 
603-824-7296 
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Captivate  Yourself. 


SANTA    PARAVIA    AND    FIUMACCIO 

Become  the  ruler  of  a  medieval  city-state 


as  you  struggle  to  create  a  kingdom.  Up 
to  six  players  can  compete  to  see  who 
will  become  the  King  or  Queen  first.  This 
program  requires  a  PET  16K.  Order  No. 
0175P.S9.95. 


CHIMERA 


CHIMERA  If  you  think  the  legendary 
Chimera  was  hard  to  handle,  wait  until 
you  try  the  Chimera  package.  Included 
are: 

•  Redex- Round  and  round  the  little 
white  ball  rolls.  Only  fast  reflexes  can 
guide  it  into  the  center  of  the  maze. 
•Dragon  — You'll  have  to  shoot  down 
those  pesky,  fire-brealhing  dragons  with 
your  cannon.  If  you  succeed  your  castle 
will  be  safe,  if  not  it  will  mean  a  call  to 
your  fire  insurance  company.  For  one 
player. 

•Oungeon~A  very  punctual  guard 
comes  dov;n  to  the  dungeon  every  day  to 
torture  you.  This  means  that  you  haveon- 
iy  thirty  seconds  to  dig  your  way  under 
the  castle  to  freedom.  For  one  player. 

•  Dragon  Hunt -You  must  go  forth  and 
slay  a  fire-breathing  dragon.  The  only 
thing  that  will  protect  you  from  the 
flames  is  your  shield,  if  you  know  when  to 
use  it.  For  one  player. 

•  Dropoff -You  must  make  your  oppo- 
nent's men  "dropoff"  the  board  by  mov- 
ing and  firmg  your  own  men.  For  one  or 
two  players.  Order  No.  0110P.  S9.95. 


PET  DEMO  I 

PET  DEIWO  I  You  can  give  yourself,  your 
family,  and  your  friends  hours  of  tun  and 
excitement  with  this  gem  of  a  package. 
•Slot  l\flachine-You  won't  be  able  to 
resist  the  enticing  messages  from  this 
computerized  one-armed  bandit. 

•  Chase-You  must  find  the  blacl<  piece 
as  you  search  through  the  ever-changing 
maze. 

•  Flying  Pheasant-Try  to  shoot  the  fly- 
ing pheasant  on  the  wing. 

•  Sitting  Ducks  -Try  to  get  your  archer  to 
shoot  as  many  ducks  as  possible  for  a 
high  score. 

•Craps -It's  Snake  Eyes,  Little  Joe,  or 
Boxcars  as  you  roll  the  dice  and  try  to 
make  your  point. 

•  Gran  Prix  2001  —  Drivers  with  experi- 
ence ranging  from  novice  to  professional 
will  enjoy  this  multi-leveled  race  game. 

•  Fox  and  Hounds-It's  you  against  the 
computer  as  your  four  hounds  try  to  cap- 
ture the  computer's  fox. 

For  true  excitement,  you'll  need  a  PET 
8K.  Order  No.  0035P  S7.95. 


Santa  Paravia 
and  Fiumaccio 

The  most  captivating 
and   engrossing   pro- 

I       gram  ever  made  for 

i      the  PET* 


It  is  the  dawn  of  the  15th  Century; 
you  rule  a  tiny  Italian  city-state.  Your 
goal:  The  Crown! 

Up  to  six  players  can  compete  as 
rulers  of  neighboririg  cities.  You  con- 
trol the  gram  harvest,  feed  your  serfs, 
set  tax  fates,  dispense  iustice  and  in- 
vest in  public  works. 

The  future  of  your  reainn  will  de- 
pend on  your  decisions.  !f  they  are 
wise,  your  city-state  will  grow  and 
you  will  acquire  loftier  titles.  If  your 
rule  is  incompetent,  your  people  will 
starve  and  you  may  be  invaded  by 
your  neighbors. 

How  will  ^ou  rule  your  kingdom? 
Will  you  be  an  enlightened  leader— or 
an  unscrupulous  despot?  Only  you 
can  answer  that  question— with  San- 
ta Paravia  and  Fiumaccio. 


TO  ORDER 


SEE  YOUR  LOCAL 
INSTANT  SOFTWARE 
DEALER 


OR 


A 


^ 


ToU-Free 

1-800-258-5473 


Instant  Software 


DOW  JONES 

DOW  JONES  Up  to  six  players  can  enjoy 
this  exciting  stock  market  game.  You  can 
buy  and  sell  stock  in  response  to  chang- 
ing market  conditions.  Get  a  taste  of 
what  playing  the  market  is  all  about.  Re- 
quires a  PET  with  8K.  Order  No.  0026P 
$7.95. 

We  Guarantee  It! 

«^>^iti(i-^ViikmiiiiikmmTAfftmfit^ 

-  ■■     ^ 


-vatit  Sofn 


J 


_  ^  yv  Guarantee  A^^^ 

=3  Ol  R  !'K(K,K,\\1S  AKI    (11  AK.VStl  I  l> 

4J  [OBI     IJt   Vl  I  I  V  I'KIHH  (   IS.  II    SOI 

%  (OMi'i.i  nn  s.\i isi  iM)  'lOi   m.w 

g  HiiiKN  nil  I'KocKwi  winns  (,ij 

^  JXW.S    .\  I  Kl  IJII    OK    Ki  I'l  ,-\l  I  Ml  SI 

•5  Will,     HI      WIl.LINCLY     (^IVIN     lOK 

'^  ,\W  KI  ASO\, 


I 


Prices  subject  to  change  without  notice. 
'  A  trademark  of  Commodore  Business  Machines 

PETERBOROUGH,  N.H.  03458 
603-924-7296 
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00188 

611A 

85 

01 

STA 

PGZ 

00189 

611C 

A5 

02 

LDA 

PGZ  +  I 

00190 

611E 

69 

00 

ADC 

to 

00191 

6120 

85 

02 

STA 

PG2  +  1 

00192 

6122 

f 

00193 

6122 

A9 

01 

LDA 

$1 

;  SET  MASK  TO  1 

00194 

6124 

8D 

DE 

60 

STA 

H 

00195 

6127 

A2 

07 

LDX 

17 

.  FOR  I  =  7  TO  0  STEP  -1 

ODise 

6129 

AD 

DD 

60 

ILOOP 

LDA 

B 

;  I F  B  AND  MOO 

00197 

612C 

2D 

DE 

60 

AND 

M 

00198 

612F 

FO 

09 

BEQ 

ILOOPl 

00199 

6131 

BD 

04 

60 

LDA 

PO,X 

;  F(  n=P(  I  )+P2 

DOZOO 

6134 

OD 

DC 

60 

ORA 

P2 

OOZDl 

6137 

9D 

D4 

60 

STA 

PO,X 

0  0  2  0  2 

613A 

OE 

DE 

60 

ILOOPl 

ASL 

M 

;  SHIFT  MASK  LEFT 

00203 

613D 

CA 

DEX 

,  SEE  IF  DONE 

D0ZD4 

613E 

ID 

£9 

BPL 

ILOOP 

00205 

6140 

; 

00206 

6140 

OE 

DC 

60 

ASL 

PZ 

,  DOUBLE  PZ 

00207 

614  3 

CE 

03 

60 

DEC 

R 

;  SEE  IF  OUTER  LOOP  DONE 

00208 

8146 

DO 

CO 

BNE 

RLOOP 

00209 

6148 

00210 

6148 

;  OUTPUT  PO(0:7) 

00211 

6148 

00212 

6148 

AO 

00 

LDY 

#0 

00213 

614A 

20 

BA 

61 

MOVEP 

JSR 

STOPTS 

;  SEE  IF  STOP  PRESSEDD 

00Z14 

614D 

BO 

12 

BCS 

MOVEFF 

;  IF  SO,  QUIT  HERE 

00215 

614F 

B9 

D4 

60 

LDA 

PO,  Y 

00216 

6132 

20 

60 

61 

JSF 

OUTCH 

;  OUTPUT  A  CHARACTER 

00217 

6155 

C9 

03 

CMP 

#3 

;  SEE  IF  3 

0021S 

6157 

DO 

03 

BNE 

MOVEPl 

00219 

6159 

20 

60 

61 

JSR 

OUTCH 

;  JF  SO,  DO  IT  AGAIN 

00220 

613C 

C8 

MOVEPl 

I  NY 

00221 

61SD 

CO 

08 

CPY 

«8 

,  ONLY  DO  8 

00222 

613F 

00 

£9 

BNE 

MOVEP 

00223 

6161 

1 

00224 

6161 

68 

MOVEFF 

PLA 

i  RESTORE  PAGE  ZERO  AREA 

00225 

6162 

85 

02 

STA 

PGZ  +  J 

00226 

6164 

68 

PLA 

00227 

6165 

85 

01 

STA 

PC2 

00228 

6167 

68 

PLA 

;  RESTORE  REGS 

00229 

6168 

AS 

TA¥ 

00230 

6169 

68 

PLA 

00231 

616A 

AA 

TAX 

00232 

616B 

68 

PLA 

00233 

616C 

V 

00234 

616C 

60 

HTS 

00235 

616D 

; 

00236 

6160 

,  DUTCH  -  OUTPUT  A 

CHARACTER  TO  DEVICE  RDEV 

0O237 

616D 

; 

00238 

6160 

;  THIS 

ROUTINE  WAS 

SUPPLIED  BY  GREG  YOB  -  THANKS 

00239 

616D 

; 

00240 

616D 

SE 

B7 

Gl 

DUTCH 

STX 

OUTCHX 

,  SAVE  REGS 

00241 

6170 

ec 

Be 

61 

STY 

OUTCHY 

00242 

6173 

48 

PHA 

00243 

6174 

A5 

04 

LDA 

SD4 

;  SAVE  CURRENT  DEVICE 

00244 

6176 

80 

B9 

61 

STA 

TMPDEV 

00245 

6179 

AO 

OE 

60 

LDA 

RDEV 

;  SET  MY  DEVICE 

00246 

6i7C 

35 

D4 

STA 

$D4 

00247 

617E 

20 

BA 

FO 

JSR 

SFOBA 

;  LISTEN 

00248 

61S1 

20 

20 

Fl 

JSR 

sri2D 

,  ATTENTION 

00249 

6184 

DUTCH 1 

=  t 

00250 

6184 

20 

BA 

61 

JSR 

STOPTS 

,  SEE  IF  STOP  PRESSED 

00251 

6187 

BO 

11 

BCS 

0UTCH2 

;  IF  SO,  EXIT  FROM  HERE 

00252 

6139 

Ag 

00 

LDA 

»0 

;  CLEAR  STATUS 

00253 

618B 

65 

9  6 

STA 

596 

00254 

EISD 

68 

PLA 

;  REGET  CHAR 

002S5 

613E 

48 

PHA 

00256 

618F 

35 

A5 

STA 

SA5 

,  STORE  WHERE  IT  SHOULD  SE 

00257 

6191 

20 

EE 

FO 

JSR 

$FOEE 

;  OUTPUT 

00258 

6194 

A5 

96 

LDA 

596 

;  SEE  IF  TIMED  OUT 

00259 

6196 

25 

01 

AND 

1 

00260 

6198 

DO 

EA 

BNE 

OUTCHl 

;  IF  SO,  TRY  AGAIN 

D02B1 

619A 

0UTCH2 

=  t 

00262 

619A 

20 

83 

Fl 

JSR 

5F183 

;  UNLISTEN 

00263 

S19D 

AD 

B3 

61 

LDA 

TMPDEV 

;  RESTORE  DEVICE 

00264 

61A0 

65 

04 

STA 

SD4 

00265 

S1A2 

AE 

10 

60 

LDX 

NMSDLY 

,  DELAY  A  FEW  MS 
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oozee 

00267 

00268 

O0Z69 

00270 

O0271 

00272 

00273 

O0Z74 

00275 

0DZ76 

00277 

00Z78 

00279 

00280 

00281 

00232 

002S3 

O0Z34 

00265 

OOZSS 

002S7 

O0Z88 

0D2S9 

00290 

D029I 

O0Z9Z 

00293 

ERRORS 

SYMBOL 

SYMBOL 
B 

EORVAL 
M 

NMSDLY 
DUTCH 3 
OUTCHY 
OUTPFX 
OUTROU 
0UTVM2 
PD 

RLOOP 
RREPX 
3T0PTI 
VM 

END  OF 


BIAS 
6iA7 
61A9 
8IAA 

eiAC 

6  IAD 
61AF 

61AF 

ElBZ 

61BS 

61B6 

61B7 

61B7 

61B3 

61B9 

GIBA 

BIBA 

6JBA 

61BA 

6IEA 

61BA 

61BD 

BIBF 

GICO 

6IC2 

61C3 

61C4 

£1C4 

=  00000 

TABLE 

VALUE 
60DD 
6011 
SODE 
6010 
61A7 
61B8 
60B1 
6  0BD 
E04E 
E0D4 

sioe 

6016 
S1C3 
6013 
ASSEMBLY 


FO 
AD 
88 
DO 
CA 
DO 

AE 

AC 
63 
60 

00 
00 
00 


AD 
C9 
18 
DO 
38 

eo 


08 
C8 

FD 

F8 

B7  61 
B3  61 


BEQ  OUTCHF 
0UTCH3  LDY  #200 
0UTCH4  DEY 

BNE  0UTCH4 

DE! 

BNE  0UTCH3 
OUTCHF  =  » 

LDX  OUTCHX 

LDY  OUTCHY 

PLA 

RTS 

OUTCHX  . BYTE  0 
OUTCHY  . BYTE  0 
TMPDEV  . BYTE  0 


STDPTS  -  SET  CARRY  IF  STOP  KEY  PRESSED 

TAKEN  FROM  PACE  5  OF  MTU  DOCUMENTATION  FOB  K-IOOZ-SC 


,  1  MS  INNER  LOOP  (LOOP  IS  5  CYCLES  LONG) 

AND  REGS 

DONE 


12  E8 

EF 

01 


STOPTS  LDA  5E8  12 

CMP  »SEF 

CLC 

BNE  STOPTJ 

SEC 
STOPTl  RTS 

.END 


;  LOOK  AT  KEYBOARD 
TEST  FOR  STOP  KEY 
CARRY  CLEAR  FOR  NO  STOP 

CARRY  SET  FOR  YES  STOP 


BYTEPL 

EXITGR 

MOVEP 

DUTCH 

0UTCH4 

OUTCOL 

OUTRl 

OUTVM 

OUTVMF 

R 

RPFXC 

AVAL 

STOPTS 

VMPAGE 


6015 
e07D 
EI4A 
616D 
61A9 
60DF 

eo9c 

6018 
6076 

60D3 
6009 
600C 
6IBA 
6012 


CLPZ 

ILOOP 

MOVEPl 

DUTCH  1 

OUTCHF 

OUTPFl 

0UTR2 

OUTVMO 

PZ 

RDEV 

HPFXR 

RVALX 

TMPDEV 


60F3 
6129 
613C 
6184 
61AF 
60BB 
60AO 
6031 
60DC 
6D0E 
BOOA 
6017 
61B9 


ENTRGR 

ILOOPl 

MOVEPF 

0UTCH2 

OUTCHX 

OUTPFZ 

OUTRET 

OUTVMl 

PGZ 

REND 

RREP 

RXGR 

V 


6083 
6I3A 
E161 
619A 
6iB7 
60C4 
60C5 
6037 
0001 
6D0D 
600B 
BOOT 
60D1 


CHOSS  REFERENCE 


B 

BYTEPL 

CLPZ 

ENTRGR 

EORVAL 

EXITGR 

ILOOP 

ILOOPl 

M 

MOVEP 

MOVEPl 

MOVEPF 

NMSDLY 

DUTCH 

OUTCHl 

OUTCHZ 

0UTCH3 

0UTCH4 

OUTCHF 

OUTCHX 

OUTCHY 

OUTCOL 

OUTPFl 

OUTPFZ 

OUTPFX 

OUTRl 

OUTRZ 

OUTRET 


$60DD 
$6015 
S60F3 
;6088 
S60I1 
S607D 
$6129 
$613A 
S6DDE 
$614A 
SGISC 
56161 
S6010 
$616D 

S6184 
S619A 
S61A7 
seiA9 
561AF 
561B7 
$61B8 
S60DF 
SGOBB 
S60C4 
$60B1 
5609C 
$6DAD 
SB0C5 


152 

42 

170 

54 

38 

30 

196 

198 

153 

213 

218 

167 

37 

96 

138 
249 
Z51 
Z67 
268 
266 
Z40 
Z41 

21 
1Z9 
126 

64 
113 
117 

57 


.  PAGE 

182 

72 
172 
103 
133 

95 
204 
Z02 
194 
222 
220 
214 
265 

9  8 

140 
260 
Z61 
Z71 
269 
272 
273 
274 
115 
131 
133 

83 
120 
113 

68 


196 
112 

132 

127 

197 

224 

104 
215 


278 
279 

157 


iZ5 


89 


187 


ZOZ 


129 
219 


240 


OUTROU 

OUTVM 

OUTVMO 

OUTVMl 

OUTVMZ 

OUTVMF 

P2 

PGZ 


PO 

R 

RDEV 

REND 

RLOOP 

RPFXC 

RPFXR 

RREP 

RHEPX 

RVAL 

RVALX 

RXGR 

STOPTl 

STOPTS 

TMPDEV 

V 


S608D 
96018 
$6031 
S6037 
S604E 
56076 
5G0DC 
50001 


560D4 

;60D3 
$60DE 
56000 
56108 
56009 
5600A 
56D0B 
56016 
SBOOC 
56017 
5B00F 
561C3 
561BA 
561S9 
560D1 


137 


VM      5  6  0  13 
VMPAGE  S6012 


ZO 
19 
57 
5  6 
70 
63 
151 
155 

181 

191 

149 

114 

35 

33 

180 

29 

30 

31 

43 

32 

44 

36 

289 

62 

244 

109 

176 
41 
74 
39 


67 
48 
59 
61 
78 
85 
175 
162 

184 

225 

170 

148 

245 

84 

208 

1Z5 

55 

52 

53 

65 

66 

139 

291 

166 

263 

111 

176 
49 
76 
4S 


87 


31 


ZOO 
164 
185 
ZZ7 
199 
207 


108 


206 
177 

188 
201 


179 
189 

215 


80 
63 

36 


213 
Z80 
116 

51 
108 


113 

Z50 
118 

71 

110 


286 
147 

73 


112 
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Machine  Language: 

Getting  To  The 

Machine 

Language 

Qm^^^m  v^m  w^0%  Jinn  Butterfield 
r  I  W^  I  Villi  Toronto,  Canada 

Your  PET/CBM  is  a  Basic  machine.  To  run  machine 
language  you  have  to  leave  Basic  —  perhaps  for  a 
temporary  period  -  and  enter  the  machine  lan- 
guage program.  You'll  often  want  Basic  and 
Machine  Language  to  work  together.  Where  time 
is  not  critical,  many  things  code  easily  into  Basic. 
But  where  speed  is  important,  or  the  job  is  beyond 
Basic's  normal  powers,  you'll  want  to  use  machine 
language  inserts.  At  that  time,  your  computer  will 
want  to  go  into  machine  language. 

There  are  four  standard  methods  of  doing 
this:  some  are  more  complex  than  others.  Each  has 
its  own  advantages  and  drawbacks. 

The  SYS  command  and  the  USR  function  call 
machine  language  whenever  Basic  desires  to  do  so. 
This  may  be  done  with  a  direct  command  or  from 
a  program.  The  machine  language  program  acts  as 
a  subroutine,  and  may  return  to  the  Basic  calling 
point  when  it  has  done  the  job. 

The  more  complex  "wedge"  method  calls  a 
machine  language  routine  frequently  whenever 
Basic  is  running.  It  doesn't  wait  for  the  Basic 
program  to  call  it  in;  it  seems  to  run  simultaneously 
with  Basic. 

The  interrupt  method  taps  the  PET's  internal 
interrupt  scheme.  Every  sixtieth  of  a  second  — 
whether  Basic  is  running  or  not-  PET's  interrupt 
kicks  in  and  does  a  number  of  quick  jobs,  such  as 
checking  the  keyboard  and  flashing  the  cursor. 
Machine  language  programs  which  tap  the  inter- 
rupt seem  to  run  continuously,  even  when  Basic  is 
not  active. 

The  Machine  Language  Monitor  has  a  Go  (.G) 
command  which  allows  you  to  start  a  machine 
language  program  directly.  The  program  is  not 
called  as  a  subroutine,  so  it  must  find  its  own  way 
back  to  the  MLM  when  it  is  finished. 

Each  of  the  four  methods  will  be  discussed 
briefly  here. 

SYS  And  USR 

SYS  and  USR  create  direct  calls  from  Basic  to  a 
machine  language  program.  This  program  runs 
only  when  called,  and  when  it  is  finished  it  will 
hopefully  return  control  to  Basic  and  allow  Basic 


execution  to  continue. 

SYS  is  a  command.  You  say  SYS  7143,  for 
example,  as  a  direct  command  or  within  a  program, 
and  machine  language  at  decimal  address  7143  will 
start  executing.  SYS  is  quite  convenient  when  you 
have  several  machine  language  prograr  is  to  be  run 
at  different  times:  you  just  give  the  address  of  each 
one  as  you  call  it. 

USR  is  a  function,  not  a  command.  You 
cannot  say  USR{0)  alone  any  more  than  you  can 
say  SQR(O);  it  must  be  part  of  a  command.  You 
might  say  any  of;  PRINT  USR(O);  X  =  USR(99);  IF 
USR(7)  =  3  THEN  ...  or  any  similar  syniax. 

When  Basic  encounters  the  USR  function 
within  a  Basic  statement,  it  will  start  to  execute 
machine  language  at  a  present  address.  Hopefully 
you  will  have  set  the  address  to  point  at  the  program 
you  want  to  run;  you  do  this  by  POKEing  the 
desired  address  into  locations  1  and  2.  Once  you've 
done  this,  USR  will  fire  you  into  the  desired  ma- 
chine code  every  time  you  use  it. 

The  argument  of  the  USR  function  —  that's 
the  value  enclosed  in  brackets  —  is  available  to  the 
machine  language  program  if  it  wants  to  use  it. 
This  value  may  be  found  in  the  floating  point 
accumulator,  which  is  at  hexadecimal  B3  to  B45  in 
original  ROMs  or  at  5E  to  63  in  subsequent  PET/ 
CBM  machines.  It's  store  in  floating  point  notation, 
which  is  devilishly  hard  to  read  if  you  don't  know 
the  system  and  not  that  easy  if  you  do.  When  a 
simmple  number  like  5  comes  up  as  hexadecimal 
83  AO  00  00  00  20  you  may  be  happy  to  reach  for  a 
built-in  conversion  routine  that  yields  a  much 
more  readable  fixed-point  value  of  00  05. 

If  you  use  the  USR  argument  you  rnay  also 
leave  a  value  in  the  same  floating  point  accumulator 
just  before  you  return  to  Basic.  This  value  will  be 
picked  up  by  Basic  as  the  value  computed  by  the 
USR  function. 

To  summarize:  SYS  lets  you  pick  any  of 
several  machine  language  programs,  USR  takes 
you  to  a  fixed  location  and  allows  you  tc  pass  a 
single  value  to  and  from  machine  language  if  you 
want.  The  SYS  command  seems  simplei  to  the 
beginner,  but  USR  is  also  straightforwa  d  once  you 
get  used  to  it. 

The  Wedge,  Or  Infiftratrng  BasFc 

This  advanced  technique  gives  the  effect  of  a  Basic 
"supervisor"  which  watches  Basic  run  and  occa- 
sionally kicks  in  with  some  of  its  own  activities.  It 
doesn't  need  to  be  called  from  Basic:  once  im- 
planted, it  will  be  there  and  active  any  time  Basic 
is  running. 

It's  a  powerful  method  of  extendin;^  Basic. 
Many  systems  use  it:  disk  monitors,  incl.iding  the 
Commodore  "wedge"  DOS;  Basic  enhancers  such 
as  the  Programmer's  Toolkit  or  Basic  Aid;  and 
Brett  Buder's  TRACE  as  published  in  COMPUTE!, 
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Skyles  Electric  Works 


BASIC  Programmer's,  Toolkit®,  Disk-0-Pro®,  Command-0® 

For  CBM®  Owners  Who  Want  More  Fun 
And  Fewer  Errors  with  Their  Programs 

Here  are  nineteen  connmands  you'll  need,  on  a  single  chip  you  can  install  in  two 
minutes  without  tools,  on  any  CBM  or  CMB  system.  4KB  of  ROM  firmware  on 
each  chip  with  a  collection  of  machine  language  programs  available  from  the  time 
you  turn  on  your  PET  to  the  time  you  shut  it  off. 

For  CBM  8016  and  8032;  BASIC  4.0 
BASIC  Programmers  Command-0® 

AUTO^'^  DUMP^^^  DELETE^"  FIND^^  (improved)  HELP*<^  KILL^''  OFF«^ 

TRACE^^  (improved)  RENUMBER^'^  (improved)  INITIALIZERS  mERGE^^  mOVE^s 

EXECUTES^  sCROLL«^  OUF^  SET^^  SEND^s  print  USING^^  BEEP^s 


100  GOSUB  in 

105  PRINT  U»N<3  Ct,  A.  H 

130  mPOT  "TIHE",  M 

131  INPUT  "DAY",  Et 
1M  IFB<  >C  THIN  105 
1H  FOR  X=ITO» 

109  PRINT  Y(l();  NEXT 
104  RETURN 

200  UXJ10 
READY 

RENUMBER  110.  10.  10S-9H 

READY 
LtST 
100  QOSUB  ISO 

1 10  PRINT  USINQ  CI,  A,  BS 
miNPUT  "TIME-,  m 

130  INPUT  "DAV.  El 
IWIFBciC  THEN  110 
1S0FORX=IT0g 
1U  PRINT  Y(X);NE)tT 
170  RETURN 
»OI=It/l» 
READY 


MERGE  D1  "BUY  HOW- 
SEARCHING  FOB  BUY  NOW* 
LOADING 

READY 
RENUMBER  100,  10 

READY 

FINDBt 

110  PRINT  USING  At.  iQ.HS'i'CI^D* 

2Mi^- "HOW  IS  THE  Tllur' 


iK BA'BA-  1 

500  RA<123-5ICI$2>BA'10 

eOO  W  BA.143  THEN  9N 

E1D  RETURN 

020  CS-"PROFIT  t*.  tt».tt  DAILY" 

UO  PRINT  USING  CS.  PI 

S4DDt  =  "L0SS    1*.  «#*.#*  DAILY" 

UO  PRINT  USING  D).  LI 

NUN 

PROFIT  »1.  MB.61  DAILY 

LOSS     %         0.00  DAILY 


NOTICE 

When  you  order  Command-0,  we  will  loan 
you  a  Toolkit  until  we  deliver  Command-0. 

NOTICE 


PRICES: 


BASIC  Programmers  Toolkit®  (chip  only) 
BASIC  Programmers  Disk-0-Pro®  (chip  only) 
BASIC  Programmers  Command-O®'  (chip  only) 
Interface  boards  (needed  sometimes) 
Instruction  Manual  {with  redeemable  $5.00  coupon) 


$40.00 

$75.00 

$75.00 

$20.00-$50.00 

$5.00 


Shipping  and  handling  $2.50  USA/Canada,  $10.00  Europe/Asia 

Calilomia  residents  please  add  6%  or  6-112%  sales  tax  as  required 
Reserve  your  Dtsk-O-Pm,  Command-O  today 
7oo/faf®  immediate  delivery.  Disl<-0-Pro  delivery  in  December,  Command-0  delivery  in  January 
VtSA,  MASTERCHARGE  ORDERS  CALL  (800)  538-3083  (except  California  residents) 
CALIFORNIA  ORDERS  PLEASE  CALL  (408)  257-9140 


Skylcs  Electric  Works 


231  E  South  Whisman  Road 
Mountain  View,  CA  94041 
(415)  965-1735 
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How  does  it  work?  It's  done  by  infiltrating  a 
Basic  subroutine  called  CHRGET  which  is  located 
in  page  zero.  This  subroutine  is  called  every  time 
the  Basic  interpreter  wants  to  get  a  character  from 
your  Basic  program.  By  making  very  careful 
changes  to  this  subroutine,  you  can  force  the  Basic 
interpreter  to  do  a  little  extra  work  for  you. 

It's  not  simple.  But  with  a  Httle  persistence  and 
a  lot  of  bravery,  you  can  train  Basic  to  do  some 
clever  new  tricks. 

Interrupt 

Sixty  times  a  second,  PET's  normal  activity  freezes. 
An  interrupt  signal  causes  a  completely  independ- 
ent program  to  run.  When  the  interrupt  program 
completes,  the  computer's  normal  programs 
unfreeze  and  continue  exactly  where  they  left  off. 

This  powerful  mechanism  allows  PET  to  do 
several  important  jobs.  Thejiffy  clock  is  updated; 
the  keyboard  is  checked  for  activity;  the  stop  key  is 
checked  and  its  condition  logged;  the  cursor  is 
flashed  when  necessary;  and  the  cassette  motors 
are  started  or  stopped.  All  of  this  is  invisible  to  the 
main  program,  which  clanks  along  happily  without 
even  noticing  the  interruptions. 

The  interrupt  mechanism  works  all  the  time, 
even  when  Basic  isn't  running.  If  you  add  your 
own  machine  language  program  to  the  interrupt 
sequences,  it  too  will  work  all  the  time  —  sixty 
times  a  second.  It's  ideal  for  watching  special  input/ 
output  ports,  flashing  parts  of  the  screen,  and 
similar  jobs. 

You  can  get  at  the  interrupt  routine  quite 
easily.  There  is  a  memory  location  called  the 
Hardware  Interrupt  Vector:  in  original  ROMs,  it's 
at  hexadecimal  0219  and  021  A;  in  new  ROM 
systems  it's  at  hex  0090  and  0091.  In  either  case, 
the  locations  contain  an  address  which  points  to 
the  interrupt  routine.  If  you  change  the  address, 
the  interrupt  mechanism  will  go  wherever  you  say, 
sixty  times  a  second.  .4t  the  end  of  your  coding, 
don't  forget  to  jump  to  the  regular  interrupt 
program  so  that  the  keyboard,  clock,  etc.  still  work 
properly. 

Changing  the  address  of  the  Hardware  Inter- 
rupt vector  has  a  small  problem.  Like  all  addresses, 
it  comes  in  two  chunks:  a  low  order  byte  and  a  high 
order  byte.  If  you  have  just  changed  the  low  order 
part  and  are  about  to  change  the  second  part  when 
the  interrupt  strikes,  you  have  a  disaster  on  your 
hands.  The  address  that  the  interrupt  finds  at  that 
moment  will  be  nonsense  —  part  old  address  and 
part  new. 

Avoid  this  problem  by  making  use  of  the  SEI 
(Set  Interrupt  disable)  instruction  to  lock  out  the 
interrupt  while  you  are  changing  the  vector.  Don't 
forget  to  restore  the  interrupt  with  a  CLI  (Clear 
Interrupt  disable)  when  you've  finished  putting 


the  address  in  place. 

It  seems  odd,  but  cassette  tape  can  neither 
read  or  write  after  you  have  changed  tie  interrupt 
vector  from  its  usual  address;  and  LOy^Ds  from 
disk  may  "hang"  without  saying  READY.  Be  sure 
to  make  provision  to  restore  the  vector  if  you  do 
much  input  or  output. 

Machine  Language  Monitor 

In  the  Machine  Language  Monitor,  you  can  type 
.G  for  Go  and  go  directly  to  any  machine  language 
program  you  like.  You  will  go  with  a  direct  jump 
(JMP)  command,  which  means  that  the  program  is 
not  treated  as  a  subroutine.  You  can't  get  back  with 
a  return  (RTS)  instruction;  instead,  you  will  likely 
use  a  Break  (BRK)  command  to  reconnect  with  the 
monitor. 

The  Go  command  and  associated  BRK  in- 
structions are  useful  in  debugging  pro^nams.  After 
your  program  is  written,  replace  .several  of  the 
instructions  in  your  program  with  Break  com- 
mands. Try  to  scatter  the  Break  commands  evenly 
throughout  your  program,  especially  tu  the  start  of 
logical  program  "modules".  Now  perform  Go  to 
the  start  of  your  program.  You  should  come  back 
to  the  monitor  almost  instantly  with  th'.'  first  Break 
point.  If  so,  you've  reached  that  prognun  step    • 
safely;  replace  the  Break  instruction  with  the 
command  that  originally  belonged  there.  Now  you 
can  Go  to  that  address,  and  the  program  will 
resume  and  continue  to  the  next  Break.  As  you  go 
through  the  program  piece  by  piece,  clicck  that  the 
registers  contain  the  values  you  expect;  if  approp- 
riate, check  key  memory  locations,  too 

If  the  PET  misbehaves  or  goes  terribly  quiet, 
at  least  you  will  have  isolated  the  portion  of  the 
program  that  is  doing  it  to  you.  On  the  next  test, 
you  can  set  your  break  points  closer  together  in 
that  area,  and  pin  the  problem  down  si  ep  by  step. 

Summaiy 

There  are  several  ways  to  link  your  PET  to  machine 
language  programs.  Beginners  will  want  to  stay 
with  the  SYS  command  and  the  USR  function  until 
they  have  gained  confidence.  They  should  learn 
the  Machine  Language  Monitor  (.G)  and  Break 
(BRK)  functions  as  quickly  as  possible  o  help  in 
checking  out  programs. 

The  advanced  functions  —  wedge  and  inter- 
rupt —  will  be  there  when  they  are  net  tied.  © 


Odds  &  Ends  on  ttie  2040  Disk 

Jim  Bulterfield 

The  disk  has  almost  more  brains  than  the  PET.  It 
contains  two  separate  microprocessors  each  of 
which  has  its  own  ROM  program;  the  micros  talk 
to  each  other  via  a  shared  block  of  memory. 
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The  image  on  the  screen  was  created 
by  the  program  below. 


10  ViSMEM;  Clear 

20  P=160:  Q»10Q 

30  XP'=144;  XR=1.  5*3, 1415927 

40  YP=5S:  YR=1:  2P=64 

50  XF=Xf^/XP:  YF»YP/YH:  2F=XR/ZP 

$0  FOR  ZI=-Q  TO  Q-1 

70  IF,  :ZI<-ZP  OR  ZI>Z?  GOTO  150 

80  ZT«2I*XP/ZP;  ZZ=ZI 

90  XL=1E4T(.5  +  SQR{XP*XP-2T*2T)) 
100  FOR  XI=-XL  TO  XL 
110  XT=SQR(XI*XI+aT*ZT}*XF:  XX=XI 
120  YY= (SIN (XT) +. 4*SIN (3*XT) ) *YF 
130  GOSUB  170 
140  NEXT  XI 
150  NEXT  ZI 
160  STOP 
170  Xl=XX+ZZ+P 
180  Yl=Y¥-ZZ+Q 

190  GMODE  1;  MOVE  XI, Yl:  WRPIX 
ZOO  IF.  Yl=0  GOTO  220 
210  GMODE  2:    LINE  Xl,Yi-l,Xl,0 
220  RETURN 


The  Integrated 
Visible  Memory  for 
the  PET  has  now  been 
redesigned  for  the  new 
12"  screen  80  column 
and  forthcoming  40 
column  PET  computers 
from  Commodore.  Like 
earlier  MTU  units,  the 
new  K-1 008-43  package 
mounts  inside  the  PET 
case  for  total  protection. 
To  make  the  power  and 
flexibility  of  the  320  by  200 
bit  mapped  pixel  graphics  display  easily  accessible,  we  have 
designed  the  Keyword  Graphic  Program.  This  adds  45 
graphics  commands  to  Commodore  BASIC.  If  you  have  been 
waiting  for  easy  to  use,  high  resolution  graphics  for  your 
PET,  isn't  it  time  you  called  MTU? 

K-1008-43M  Manual  only  $10  (credited  toward  purchase) 
k-1008-43  Complete  ready  to  install  package  $495 

Mastercharge  and  Visa  accepted 

Write  or  call  today  for  our  full  line  catalog  describing  all 
MTU  6502  products,  including  our  high  speed  8"  Floppy 
Disk  Controller  for  up  to  4  megabytes  of  PET  storage. 
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Micro  Technology  Unlimited 

2806  Hlllsbarouqh  Sireel 

po.  Box  um 

Raleigh.  HC  27605.  U.S.A.        , 
131918331458  '  ' 
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A  Thirteen  Line 
BASIC  Deiete 

Arthur  C  Hudson 
Ottawa,  Ontario 

Here  is  a  short  program  written  entirely  in  BASIC, 
wliich  allows  you  to  delete  any  group  of  lines  from 
an  existing  program.  Typically  the  increment  is  1 ,  so 
that  all  lines  in  the  group  arc  deleted,  but  this  is  not 
necessary. 

To  use  the  Basic  Delete,  just  screen  merge  it 
with  your  existing  program.  Hopefully  no  conflict  of 
line  numbers  will  occur,  if  there  is  conflict,  then 
some  renumbering  will  be  required.  After  the  merge, 
RUN7878,  and  as  instructed,  modify  the  listed  line 
7892  to  define  the  start,  the  end  and  the  increment. 
Then  press  return  twice,  and  the  delete  process  will 
begin.  The  line  number  being  deleted  is  displayed 
and  you  may  press  BREAK  (RUN/STOP)  at 
any  time. 

As  an  example  of  using  an  increment  other  than 
unity,  you  could  write  all  or  part  of  a  program  using 
even  numbers  for  the  useful  statements  and  odd 
numbers  for  the  remarks.  Save  on  tape  or  disk,  and 
then  automatically  delete  all  the  remarks  and  save 
again.  Finally  the  original  can  be  brought  back,  and 
all  even  numbered  statements  deleted.  This  gives  a 
program  consisting  only  of  the  remarks.  Each  of 
these  three  versions  can  have  its  uses. 

Somewhat  complicated  programming  techniques 
are  used  here,  and  the  statements  must  be  entered 
carefully.  Note  that  after  you  have  modified  the 
automatically  listed  line  7896  and  pressed 
RETURN,  the  cursor  will  rest  on  a  direct  statement, 
RUN7882.  In  this  way,  a  second  RETURN  will 
initiate  the  delete  process. 

The  program  uses  the  dynamic  keyboard  feature 
of  the  PET.  (See  COMPUTE!  Issue  4  page  58  and 
the  earlier  reference  -  Louder  -  cited  therein).  It  uses 
bins  834  and  835  in  the  second  cassette  buffer,  but 
this  does  not  prevent  use  of  the  second  cassette. 

One  of  the  more  interesting  problems  in  this 
type  of  program  is  that  PET  suffers  from  amnesia  the 
moment  it  executes  a  delete  (all  variables  set  to  0).  It 
is  for  this  reason  that  parameters  have  to  be  embed- 
ded in  a  program  statement,  and  also  N,  the  number 
of  the  line  currently  being  deleted,  must  be  poked 
into  memory  before  the  deletion  and  retrieved  after 
it. 

Note  that  in  line  7892  the  word  'INCRE- 
MENT' is  spelled  incorrectly.  Don't  try  to  fix  it,  or 
PET  will  sec  the  word  REM  inside  it  and  bumb  out. 
Don't  think  you  can  get  away  with  substituting  'step' 
for  'incrment',  because  PET  will  object  to  the  use  of 
ST,  a  reserved  word.  Finally  don't  try  incr'ment. 


PET  doesn't  like  this  either,  (not  alphanumeric). 

The  first  time  that  the  Basic  Delete  is  used,  the 
asterisks  in  SN7896  will  be  replaced  by  numbers. 
There  is  of  course  no  need  to  replace  the  asterisks 
when  executing  a  SAVE. 

My  version  of  this  program  uses  abfjut  330 
bytes.  It  is  certainly  possible  to  trim  this  down  by 
about  50  bytes. 

If  You  Have  OLD  ROM 

Referring  to  statements  numbered  7884  and  7886; 
for  623  and  624  substitute  527  and  528.  For  158 
substitute  525.  These  bins  relate  to  the  keyboard  buf- 
fer. Note  that  Harvey  Davis's  article  is  written  for 
old  ROM,  so  the  conversions  given  above  apply  in 
reverse,  if  you  have  new  ROM. 

Reference; 

Algebraic  Input  for  the  PET,  HarvL-y  Davis,  COMPUTE!  Vol.  i. 
Issue  4,  page  .')8, 

10  PRINT"fi^^A  THIRTEEN  LINE  BASIC  DELETE 

12  PRINT"i^ARTHUR  C.  HUDSON 

14  PRINT "ill  AMBERLY  PLACE 

16  PRINT"^^OTTAWA,0NT. 

18  PRINT"iCANADA 

20  PRINT"iKlJ  7J9 

22  PRINT"fPHONE  (613)  749  5475 

30  PRINT"^^l^KEY  IN  C0NT":STOP 

7878  PRINT"R»HODIFY  SN7896,THE'I  CR 

7880  PRINT"t^RUN7882TTT":LIST7B96 

7882  POKE835,0:POKE834,0:GOTO7S94 

7884  POKE623,13:POKE624,13 

7886  POKEl5  8,2:PRINT"Fii^t^GOT07894 

7888  PRINT"h+^"N"TTT";  :N=N-l-IN 

7890  D=INT(N/256} :POKE835,D 

7892  POKE834,N-D*256:END 

7894  N=256*PEEK(835>+PEEK(834) 

7896  FIRST=O0O0:LAST=0000:INCRyiEnT=01 

7893  IF  N  >  LA  THEN  STOP 
7900  IF  N  <  PI  THEN  N=FI 
7902  G0TO7884 

READY.  © 


QFf  ICE  KJQBK  LTD* 

INVOICING  PROGRAM  FOR 
PET/CBM®  SYSTEMS 


•  No  special  forms  required. 

•  Available  on  Cassette  or  Disk 

•  Works  with  old  or  new  ROMS. 

•  Requires  only  16KB  of  memory. 

•  Requires  CBM  2022  or  2023  Printer 

Limited  Time  Introductory  Price  -  $50.00 
To  order  send  check  or  money  order  for  'iSO.OO  to: 
OFFICE  WORK  LTD,  2523  Harley  Drive,  Greens- 
boro, North  Carolina    27406. 

Also  ask  for  our  Supplies  Booklet! 

North  Carolina  Residents  add  4%  Sales  Tax 
Works  on  Ihe  ncwSO-column  CBM 
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Agricultural  Software 
from  Cyberia™ 


FOR  PET/CBM  SYSTEMS 


GyDCr^rSriTIBrThe  complete 
accounting  package  for  today's  farm  operations 

■  Records,  sorts,  combines  and  prints  the  results  of  the  farm  operation. 

■  Account  headings  and  numbers  are  pre-assigned  for  nearly  every  type 
of  farm  income  or  expense,  but  any  account  may  be  deleted,  altered  or 
added. 

■  Keeps  personal,  famiiy  and  house-hold  accounts  as  well. 

■  Cyber-Farmer  management  tools  include  cash-flow  analyses,  depreci- 
ation schedules,  inventory  and  budget  reports. 

■  No  computer  experience  is  necessary  to  operate  this  system. 


Farrow-Filer 

Record-keeping  and  management 
system  for  the  pork  producer 

■  Helps  the  pork  producer  to  lower  their  cost-per-pig 
by  producing  more  animals. 

■  High  visual  impact  of  reports  allows  for  better 
culling  of  freeloaders. 

■  Alerts  the  operator  to  possible  medical  problems 
in  the  herd. 

■  Forecasts  farrowings  for  a  3  month   period. 

■  Keeps  individual  records  on  each  animal. 


Farmer's  Workbook 

The  most  powerful  management  tool  ever  for  the 
agricultural  producer.  Farmers  Workbook  combines 
the  power  of  Visicalc"'  *  with  the  knowledge  of  a  ma- 
jor midwestern  university.  The  Farmers  Workbook  is 
a  collection  of  templates  that  are  designed  to  be  run 
on  the  Visicalc-  program.  The  templates  include 
lables,  formulas,  sample  data,  test  cases  and  full 
documentation.  Template  titles  include:  Cattle 
Feeder,  Pig  Production,  Sheep  Production,  Grain 
Management,  Loan  Payments,  Market  Average,  Land 
Purchase  and  many  others. 

'Visicalc  is  a  trademark  of  Personal  Software,  Inc. 


Also...Two  Other  Enhancements  for  PET/CBM  Systems 


SuperBus 


Greatly  multiplies 
system  capabilities 


per  computer 


This  is  an  active,  integrated  system— not  just  a  passive  network.  Super- 
Bus  gives  schools,  banks,  laboratories  and  businesses  control  of  the 
way  their  networks  operate. 

■  Up  to  18  computers,  disk  drives  or  printers  can  be  interconnected. 

■  Complete  file  security  (program  and  data)  and  BASIC  security. 

■  Built-in  error  detection  and  convenience  features. 

■  Can  both  read  and  write  to  disk. 

■  Ail  BASIC  commands  can  be  used. 


Auto-Boot 


Simplifies  PET/CBM  operation 


C/1Q95  per  computer 


Auto-Boot  is  a  ROM  that  automatically  toads  and  runs  the  first  program 

on  the  disk  {initializing  if  necessary). 

Completely  compatible  with  most  other  programs. 

Just  insert  the  disk  in  the  drive,  turn  on  the  computer,  and  Auto-Boot 

does  the  rest. 


MastfifCard.  VISA  and  C.O-D.  orders  ai;cepted.  Specify  computer  model  when 
ordering  SuperBus  or  Auto  Boot.  Dealer  inc;uir;es  invited. 
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J    2330  LINCOLN  WAY. 


515-292-7634 
AMES,  IOWA  50010 
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Calculated 
Bar-graph 
Routines  On 
The  PET 


Edward  F.  Heite 
Comden-Wyoming,  Delaware 

To  exploit  the  CBM  printer's  graphic  potentials, 
programmers  need  a  few  routines  that  haven't 
been  published  yet.  The  "Keyprint"  program 

(COMPUTE!,  issue  7,  page  84)  is  okay  for  dumping 
40  columns  to  the  printer,  if  you  have  the  right 
ROM.  But  if  you  want  to  manipulate  the  full  80 
columns  and  create  complicated  graphs,  you  need 
a  way  to  calculate  the  length  of  the  bar, 

A  calculated  bar  can  be  created  as  a  string 
variable,  by  concatena(ing  a  graphic  string  to  the 
desired  length  with  a  FOR  ...  NEXT  loop.  Listing  1 
is  a  dummy  program  to  demonstrate  this  process. 

Line  1  sets  B$  to  an  empty  value.  Line  2 
defines  C$  as  a  single  graphic  character.  In  line  3, 
the  value  of  the  bar  is  set  at  20;  in  actual  programs, 
this  would  be  a  calculated  value.  Line  4  sets  the 
FOR  ...  NEXT  loop  to  the  value  of  J,  and  thus 
determines  the  length  of  the  bar.  Line  5  concaten- 
ates B$— C$  to  create  a  new  value  for  B$.  Line  5 
keeps  adding  symbols  to  B|  until  the  loop  reaches 
the  value  of  J.  After  the  loop  has  cycled  the  required 
number  of  times,  B$  is  a  bar  of  length  J ,  which  in 
this  case  is  20. 

In  normal  program  use,  a  series  of  these 
routines  would  create  the  bars.  Then  the  printer 
routine  would  use  them  in  a  report;  lines  7-9  are  a 
typical  printer  routine. 


LISTING  1 

i   B*="" 

2  C$="m" 

3  J=20 

4  FOR   X=l    TO  .J 

5  B-$=rs+B-i- 

6  HEHT   K 

7  OPEH    1..4..0 

3  PRINTttl..    B* 

9  CLOSE   1 

INTRODUCING 

ABP 

ADVANCED  BASIC  PROGRAMS{C),  A 
POWERFUL  DISK-BASED  PROGRAM 
LIBRARY  FOR  THE  1 6/32K  CBM/F^ET 
COMPUTER,  FEATURING  STATISTICAL, 
MEDICAL  AND  UTILITY  ROUTINES  FOR 
THE  RESEARCHER,  THIS  PACKAGE  !S 
DERIVED  FROM  A  DRASTICALLY 
ENHANCED  VERSION  OF  OSBORNE'S 
"SOME  COMMON  BASIC  PROGRAMS" 
AND  ALLOWS  MENU  PROGRAM 
CHAINING,  STREAMLINED  DAT>4  ENTRY, 
AND  OPTIONAL  PRINTER  OUTPUT, 
OVER  90  PROGRAMS!!! 

PRICE 
-Program  Disk  $29.95 
-Manuals  (Includes  Osborne's 

"Some  Common  Basic  Programs)  $1 2.95 
-Complete  package  $39.95 

And  Associates 

9  Brown  Place 

Woburn,  Massachusetts  01801 

Mass.  residents  add  5%  tax.  Add  $2.50  per  orde^  for  postage 
and  tiandiing.  (Available  in  CODOS  and  8050  Fcrmal  by 
special  order.) 
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1,000,000  Bytes 


PET/BETA-1 


If  your  data  and  program  handling  requirements  are 
minimal,  a  mini-disk  may  be  for  you.  If  you  wait  lo  access 
large  amounts  of  data,  program  libraries,  flexible  user- 
defined  data  lormating,  and  easy  to  understand  documen- 
tation, CONSIDER  the  PET,;BETA-1, 

The  PET.' B ETA- 1  is  a  fast  digital  tape  system  incorporating 
ihe  BETA-1  drive,  with  a  llextble  user-orienteJ  operating 
system.  The  double-density  drive  has  high-speed  random 
access  to  over  l  million  bytes  per  digital  cassette  with  a 
transfer  rate  of  IK. second, 

PET/BETA-1  System 

Single  density  (512  k  drive) S600 

Double  density  (1  meg  drive)   $  800 

\i  ANU  A  L  i-inc'i^  Jh^o  To  3  jfcr^aie*  ST  0,00 
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PET/CBM*     IEEE-488    TO    PARALLEL    PRINTERS 

THE  P.I.E.-C  IS  COMPATIBLE  WITH 
Centronics,  NEC  "Spinwriter" ,  Escon  Products,  AJ-841, 
IDS  "Paper  Tigers",  Anadex,  "MIPLOT"  by  Watanabe,  etc. 
**  +  *        *  +  +  +        +  +  +  * 

Fully  assembled  and  attractively  enclosed.  Connected 
with,  and  powered  by,  the  printer  using  the  6'  data 
cable.  Independently  addressable  as  Device*  4  to  30. 
IEEE-488  Bus  Extension  for  floppy  disks,  etc.  Switch 
selectable  PET-TO-ASCII  code  conversion.  No  software 
drivers  required  —  Uses  BASIC  488  commands  instead. 
*  +  +  +        ****        *  +  +* 

ORDER  TODAY  --  ONLY  $119.95  (+$5  S&H)  (Md.  Res.  +TAX) 
Specify  printer  model  plus  PET  model  and  ROM  level 

LemData  Products       (301)  730-3257 
P.O.  Box  1080,  Columbia.  Md.  210^14 

"PET/CBM  are  trademarks  of  Commodore  Business  Machines 
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McTerm 


EDISON 
DMPUTER 


A  Telecommunication  Package 

With  the  McTerm  package  your  Commodore  computer  can  now  become  a  very  Intelligent 
terminal.  It  allows  you  to  easily  participate  in  the  electronic  mail  revolution.  McTerm  can 
communicate  simultaneously  with  another  PET  or  mainframe.  You  can  transfer  entire  disk  files 
to  other  disk  drives;  send  or  receive  program,  WordPro,  sequential,  or  relative  files.  This 
package  works  on  Commodore  computers  with  3.0  or  4.0  Basic,  1 .0  or  2.0  DOS,  40  or  80  column 
computers,  and  2040  or  8050  disk  drives  (requires  the  use  of  TTL  Level  RS-232  modems). 

Complete  with  Program ,  ROM ,  Cable  and  Manual. 
Price:  $195.00 

Features  include: 

-Baud  selection  from  75  to  1200.  I 

^      ^  -Full  and  halfduplex,  also  local  echO: 

r  -Supports  odd,  even  and  mark  parity. 

-CRC,  error  checking  for  PET  to  PET  files.  j 


1825  MONROE  STREET,  MADISON,  Wl    53711    (608)255-5552 
K^  -Dealer  Inquiries  Are  Welcome- 
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The  Revised 

Pet/CBM 

Personal 

Computer 

Guide 

Jim  Butterfield 
Toronto,  Canada 

This  article  deals  with  the  changes  and  new  features 
of  the  well-known  Osborne/McGraw-Hill  guide.  As 
such,  it  isn't  a  full  scale  review.  Many  PET/CBM 
users  are  familiar  with  the  first  edition;  it  was  the 
first  truly  comprehensive  user  guide  for  their 
machine.  As  such,  they  were  less  likely  to  complain 
about  its  faults,  which  were  few,  and  more  likely  to 
be  thankful  that  such  a  book  finally  existed. 

A  Stronger  Styie 

The  new  edition  is  a  major  revision.  The  previous 
casual,  almost  folksy  style  ("Assuming  you  have 
just  brought  your  PET  home  in  a  box,  you  must 
unpack  it")  has  been  replaced  by  a  much  tougher 
down-to-business  style.  The  name  PET  has  been 
almost  universally  replaced  by  CBM.  The  new 
book  socks  it  to  you  with  a  much  more  hard-hitting 
style. 

The  organization  of  the  book  is  stronger. 
Chapters  have  been  reorganized,  and  additional 
Basic  programming  material  inserted.  There's  a 
stronger  grouping  of  data  with  headings,  subhead- 
ings and  detail.  The  Preface  suggests,  "Even  if  you 
have  never  programmed  a  computer  before,  this 
book  will  teach  you  how  to  write  yotir  own  Basic 
programs ...  Chapters  4,  5  and  8  teach  BASIC 
programming."  That's  190  pages  of  Basic  material, 
the  last  50  of  which  are  essentially  reference.  It 
may  be  rather  too  terse  for  many  learners,  but  it's 
all  there. 

File  Foulup? 

The  book  covers  the  newer  4.0  ROM  system.  This 
is  quite  a  feat  considering  how  recent  this  system  is. 
Unfortunately,  some  of  this  new  material  appears 
to  have  been  prepared  hastily. 

The  new  Relative  data  files  are  discussed,  but 
the  book  gets  the  whole  thing  wrong.  It  would  be 
well  for  readers  to  stay  away  from  this  section 
entirely:  relative  files  are  easy  to  handle,  but  not  in 
the  manner  the  book  suggests.  It  seems  that  the 
aiuhors  have  confused  the  carriage  reltirn  character 


with  the  IEEE-488  EOI  line;  somehow  the  comma 
gets  dragged  in  as  a  field  delimiter  and  we  end  up 
with  a  mess.  Worse  and  worse:  playing  with  the 
comma  makes  numeric  file  variables  difficult  to 
handle,  and  we  end  tip  with  pages  of  explanation 
on  how  to  cope  with  this.  It  would  have  been  so 
easy  if  we'd  started  off  on  the  right  foot:  for  writing, 
one  PRINT#  statement  writes  one  record;  for 
reading,  EOI  (as  detected  in  the  ST  value)  signals 
the  last  field  within  a  record.  And  no  commas, 
please. 

Appendices 

The  tables  in  Appendix  A  do  a  fair  job  of  trying  to 
sort  out  the  various  codes  used  by  the  f  ET.  Between 
screen  formats,  PET  ASCII,  true  ASCII  and 
keywords,  they  take  some  unscrambling. 

For  a  book  which  makes  some  effort  to  be  up- 
to-date  on  such  things  as  4.0  machines,  I  was 
surprised  to  see  the  out-of-date  list  of  CBM  new- 
sletters and  references  given  in  appen:lix  D.  The 
PET  Gazette  and  PET  User  Notes  were  still  listed, 
and  there  was  no  sign  of  COiMPUTE!  magazine. 
And  I  really  thought  that  Commodore  Canada's 
excellent  Transactor  should  have  been  on  the  list. 

Table  F-3  near  the  end  of  the  book  is  a  curious 
piece  of  work.  It  seems  that  the  authors  got  hold  of 
the  symbol  table  from  Commodore/M  crosoft's 
assembly  and  sorted  and  printed  it  for  both  Upgra- 
de and  4.0  ROMs.  It's  fascinating;  I  suspect  that  it 


ECX  COMPUTER  CO/^^PANY. 

Specialists  In  Commodore  PET 
Equipment,  Peripherals  And  Saftware. 

WE  OFFER  THE  FOLLOWING  PRODUCTS: 

•SX-300:     IEEE  MODEM  SOFTWARE,  WITH  R  EMOTE  DISK/FILE 

ACCESS  $79.95 
*SX- 1 00:     lEEE-488  MODEM  SOFTWARE  (FOR  COMMODORE 

MODEL 8010)  S49.95 

*MX-200:    CUSTOM  PARITY  IEEE-488MOD&^WrTH  SX.2aO 
SOFTWARE  $449,95 

•X232:        PET  TO  RS232C  BIDIRECTIOIiAL  1 1TERFACE 
$125.00 

*X901 :        PET  BEEPER:  ADDS  8032  BEEPEF!  SOUMD  TO  YOUR 

OLD  PET  $19.95 
♦X902;        PET  CASSETTE  SOUMD:  HEAR  THE  CASSETTE 

LOADIMG/SAVIMG  SI 9.95 

•CI  01:        CErlTRONICS/NECTOIEEE-488(PET)  INTERFACE 
$225.00 

*C102:        WATAHABE  DIGIPLOTTO  IEEE-488  (PET) 

INTERFACE  $295.00 
•WX4671:  WATANABE DIGIPLOTINTELLIGENTGRAPHICS 

PLOTTER  SI 395.00 

•CURVE:     GRAPHICS  SOFTWARE  PACKAGE  FOR  THE 
DIGIPLOT  AMD  PET  S295.00 

♦PET  COMPUTER  SYSTEM  DESK,  WALMUT  OR  OAK  $395.00 
♦NEC  SPINWRITER  PRINTER  STAND:  AAATCHES  DESK  NOTED 

ABOVE  $275.00 
•ALL  COMMODORE  BUSINESS  MACHINES  COMPANY  PRODUCTS 

We  offer  fast  and  efficient  service  on  all  Commadore  Business 

Machines  Equipment! 

Send  it  to  us  via  (IPS;  You  will  have  it  back  usl  ally  within  a  weekll 

ECX  COMPUTER  COMPAJSY 

2678  North  Main  Street  #6 

Walnut  Cf€ck.  CA  94596 

(415)944-9277 

ECX  COMPUTER  COMPANY  IS  A  SUBSIDIARY  OF  COM-PUCATIONS  INC. 
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PETTERM 


TM 


Terminal 
Program 


Use  your  PET  as  an  intelligent  terminal.  Access  timeshare  systems 
and  networks  such  as  the  Source  or  Telenet.  This  is  an  interrupt  driven 
system  with  buffered  input/output.  Unlike  dumb  terminals,  the  PET 
can  do  other  tasks  instead  of  having  to  wait  for  incoming  data.  This 
flexibility  allows  many  advanced  features. 

These  are  complete  assembled  hardware  and  software  packages. 
All  include  line  editlng/resend,  auto-repeat,  shift  lock,  output  to  IEEE 
printer  and  much  more.  Delivered  on  cassette  or  disk.  Also,  available 
for  Commodore  8010  modem  or  Livermore  Star  488  modem. 


Intelligenf   Communicaf ion 


Uploads   and  Downloads 


In  Machine  Language 


$  80.00 


90.00 


PETTERM  I  All  features  above 

PETTERM  II  All  features  of  I.  plus  local 

text  editor  with  down-loadmg  capability 

PETTERM  III  All  features  of  II.  plus 

80  132  column  scrolling  window  for 

viewing  formatted  outputs  wider  than 

40  columns 100.00 


FORTH 


A   Pr 


09'-om„,„g   R^^^,^^. 


fOfi 


FORTH  Interactive  high  level  compiler  and 
operating  system  5-10  times  faster  than  PET 
BASIC.  High  level  block  structured  language 
This  IS  a  true  fig- FORTH  implemenlalion  for  16  and 
32K  PETs. 


fig-FORTH.  with  editor,  assembler S50.00 

with  floating  point  and  strings  S50.00 

with  floating  point,  strings,  macro-assembler       S70.00 
cassette  and  disk  interface  available. 


DEALERS  INQUIRE 


fo-#'"t«j-3i*~^      -for^ 


>:m.ai.  T  1     c^orrtiocj-t. 


1903   Rio   Grartd* 

Austin ' Texas 
78705 


1-512-477-2287 
Source:  TCE995 


P.O.    Box      8403 

flustinjT«x*s 

78712 
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shows  the  original  Commodore/Microsoft  symbolic 
names  for  memory  addresses:  for  example,  the 
Floating  Point  Accumulator  at  hexadecimal  005 E 
seems  to  be  called  FAC.  But  mixed  in  with  these  is 
a  series  of  values  which  don't  represent  addresses 
at  all.  For  example,  hex  35  is  the  memory  address 
of  part  of  the  top-of-Basic-memory  pointer.  But  35 
is  shown  in  the  table  as  ERRFC,  which  happens  to 
be  the  value  loaded  into  the  X  register  just  before 
printing  an  PILLEGAL  QUANTITY  error  mes- 
sage. Oddities  in  this  computer-generated  table: 
non-existent  addresses  are  printed  as  0000  rather 
than  being  left  blank;  and  locations  for  which  the 
authors  apparently  had  no  explanation  are  marked 
"X".  It's  a  lovely  table  —  I  wish  I  could  figine  out 
why  it's  there. 

Summing  up. 

Like  its  predecessor,  the  new  book  is  a  prodigious 
work.  Its  stronger  style  will  improve  its  value  as  a 
reference,  although  some  readers  may  miss  the 
more  casual  approach  of  the  first  edition. 

It's  certainly  the  most  comprehensive  guide  to 
using  CMB/PET  machines  that  is  available  today. 
The  book  is  well  organized  and  clearly  written.  It's 
generously  fitted  with  examples,  programs,  dia- 
grams and  tables.  Apart  from  the  problems  dealing 
with  Relative  files,  the  book  is  a  sound  approach  to 
using  the  computer. 

[PET/CBM  Personal  Computer  Guide,  Second 
Edition:  by  Adam  Osborne  and  Carroll  S.  Donahue. 
Published  by  Osborne/McGraw-Hill,  Berkeley, 
California.]  @ 


n^onev  BbcK  Guaranlee 


Dealer  Inquiries  Welcorr\e 


New  248-page  book  includes  all  Ihe  former  TIS  workbooks 
except  'PET  Graphics. '  Provides  inlormalion  tor  both  ROMs  and 
a  comprehensive  index.  Only  $14.95. 

Also  Irom  TIS 
WB  3  PET  G'spdics         SJ  95 

Software   products  on   cassette  or   tloppy   disk   with   coniplele  instruction 
manual  Each  $24  95  (cassettcj.  S29  95  (disKeiie) 

SW-1  MAIL  8  mailing  lisl  system 

SW-2  CHECKBOOK  record 

SW  3  ACCOUNTS  keep  track  ol  who  owes  you  how  much 

SW-4  MEDIT  create  and  maintain  date  files 

SW-5  CAI_ENDAP  appointments,  meetings  at  a  glance 


TIS 

P.O.  Box  921.  DepI,  C 

Los  Aiamos,  NM  87544 


Add  S2  (S5  foreign  orders) 
shipping  and  handling 


IF  I 


■  t'SdrrmailrS  lyt  C'Jinrri'jd'/itf  tl  ■ 


A 

Wooden 

Computer? 


Not  from  Commodore! 

So  why  should  the  desk  iook  like  wood?  A  pleasant 
cream  and  charcoal  trimmed  desk  looks  so  much  belter 
with  Commodore  systems.  One  look  and  you'll  see. 
Interlink  desks  are  right.  By  design. 

The  specifications  only  confirm  the  obvious: 


•Cream  and  charcoal 
color  beautifully  matches 
the  Commodore  hardware 
and  blends  with  your 
decor. 

•An  Ideal  710  mm  (28") 
keyboard  height  yet  no 
bumping  knees  because  a 
clever  cutout  recesses  the 
computer  into  the  desk- 
top. 

•High  pressure  laminate 
on  both  sides  of  a  solid 
core  for  lasting  beauty 
and  sirength. 
•  Electrostatically  applied 
baked  enamel  finish  on 
welded  steel  legs  — no 
cheap  lacquer  job  here. 


•T-molding  and  rounded 
corners  make  a  handsome 
finish  on  a  dutable  edge 
that  won't  chip. 

•  Knocked  down  for  safe, 
inexpensive  shijjment. 

•  Patented  slip  joints  for 
quick  easy  assembly. 
•Leveling      gl  des      for 
uneven  floors. 

•Room  enousih  for  a 
Commodore  printer  on  the 
desk,  yet  fits  into  nearly 
any  den  or  offi:e  niche — 
H:  660  mm  (26')  W:  1170 
mm  (46")  D:  660  mm  (26"). 
•Matching  printer  stand 
available  witfi  slot  for 
bottom  feeding 


Price:  $295 

In  short,  as  Commodore  dealers,  we  won't  settle  for 
anything  that  looks  good  only  in  the  caalogi  Our 
customers  won't  let  us.  They  don't  buy  pictures.  And 
neither  should  you.  This  is  why  we  will  let  you  use  one  of 
our  desks  for  a  week  and  then  decide.  If  for  .iny  reason 
you  don't  like  it,  just  return  it  in  good  condition  for  a 
cheerful  refund. 


If  your  Commodore  dealer  doesn't  carry  our  desks  yet, 
send  a  check  for  $295  and  we  will  ship  your  desk  freight 
paid! 

Name 

Address 

Ctty 


_St_ 


_Zip.„ 


Irrterlink,  Inc.,  Box  134,  Berrien  Springs,  Ml  49103 
Master  Cliarge  and  Visa  welcome.  Call  our  order  line: 
616-473-3103 
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CBM/PET  Computers  &  Such! 


Kfrfluri'S    for   Mar/Aijr   fll: 

Reconditioned    SEI.KCTRKs 
11"    cj  rr  i  a^e  t   /.i9 

J5"    c!Jrri,i(ii-  t    549 

l";-    f.irr.h/<I.PKT    i/f    tl2')!i 

Micro    ^oflwurc    Systems 

Hi  1  1  board     for    8032  i       39 

Hi  1  I  board    for    2001         t      '« 

Curiior    Mrfi^azine    (on    tjptf, 

specify     i&sucs.     Write 

tor    dialog)  IO/t44.95 

Cable.    F'HT-IKKK  $       37 

Cable,  IKKK-IKKK        t  1.7 

Modem    f    lerminal     soflwjret    2/7 

NHC     Spinwriirr    #5530  12695 

Xyuiec     I  ypewr  I  1  pr/pri  nt  rr    $2499 

Ceiuronici    737.    PKT    l/(       $    899 

Epson    MX-SO.    PKT    i /f  t  599 

Walanabe    MIPLOT  tlU9 

Uncrasher     (for    new    20011     *       15 

Free    cassellj  drive    with    l6/32k    CBM 


CAM.  KOR  CURBKNT 

PRICKS  ON  CHM/PKT 

EQUIPMENT 


CONNECT  PET/CHH  TO  PRINTER:  Simply  pluj  into  the  interface 
and       usp       your       PKT/CHM       computer       with       popular  "slatidiifii" 

printers,  or  add  a  video  monitor  for  a  second  display.  All 
interfaces  are  asscmhled,  tested,  and  varantecd.  No  software 
i  s    requ  i  red . 


Xymec,      or      other      industry 
Works  with   disk,    other    lEtE 


Hedthkll      ll-U. 
ra ( e  desi  red ) . 


T1J-65C  Use       NEC,       Centronics. 

standard    parallel    printers. 

devices   attached.      $l2y.95 
TU-65U  Use    B5-232     (scriaU    printers,     like 

300      to      4300      baud       (please      specify 

Includes    power    pack.       $79.95 
TU-PVE  Connect     your    Video    Monitor    to       PET/CUM       (or       second 

display.      Our   unique    contact    extensions    ledve      (he      user 

port    available      for      connection      of      other      accessories. 

$39.95      (NOT    for   8016/32) 
SSCON     Interfaces: 

SELECTRIC    to    PET/CBM 

SEI.ECTB1C    to  Apple.    Alan.    T1I5-80:    Parallel 

SEI.ECTR1C    to   Apple,    Alan,    TRS-80:    RS-2J2    Serial 

MTST-1/0       to    Paral  lei 

Cables    extra.     $20    to    $90.  Installation 


J649 
$549 
$579 
$425 
$100 


Virsinia    Micro    Systems      lUlif/ Z'^^,"-* 


1441S  Jefrerson  Davis  High^tay 
Wuudbiidge.  Vilginia         22191 


(7031  491-650? 


sales   &    service 
MWF    12-8. Sa    9-3 


ryie,  )^m  j^bbit 


^* 


Your  CJUisVi... 


Is  Cflj  ConiAiQra6 

rts  all  in.  a 
Z4-'Pin.  ponx 
at  CHS  M 


■pet"  Oturaers 
QrorLtea  3  tUlaHes  : 

1 .  Tader  Cassette  load. 
S.tneiTjorij  xrest  and 


ROM  and  MANUAL  —  $49.95 

Specify  3.0  or  4.0  Basit;  (Works  with  or  without  toolkit) 


Eastern  House  Software 

32  39  Lind^  Drive 
Winston-Salem,  N.  C.  2710S 


(919)  924-2889 
(919)  748-8446 


IEEE-488  BUS 

SYSTEM  BUILDING  BLOCKS 

For  Commodore  PET/CBM  and  other  computers. 


TNW-2000 


TNW-1000 

TNW-2000 

TNW-232D 

TNW-103 

SOFTWARE 


PLUS  MosI  popfjiai  COfnputerS 
disks  pfirtcrs  eic 


TNW 


COHPOHATION 


Serial  Interface:  $129 

I  cnannci  ojlpul  only 

Serial  Interface:  $229 


Dual  Serial  Interface:  $369 

^  c  *^d'■•f\'S  mpul  .3na  oulpul  plus  RS-232  control  imes 

Telephone  Modem:  $389 

.>,.To  duswt^r  auto  3iai  Usi?  Aiir  DAA 

PTEfiM:  A  prcjgf  ar^  Itial  luns  yOLir  PET  into  a  terminal 
I  use  *ith  TNW-20nn.  TNW-23JD,  or  TNW  tD3) 

SWAP;  Allows  storage  ot  up  to  S  piograrr.s  m  PET 
memoiy  al  once  Rjn  TNem  in  any  order 

PAN:  A  sopfiislica'ed  eJoct'onic  niaii  program 
US'?  Ailh  TNW   103) 

Write  or  call  for  Information  today: 

TNW  Corporallon 
3351  Hancock  Street 
San  Diego  CA  92110 


(714)  225-1040 


PET'  MACHINE   LANGUAGE  GUIDE 


PET 

MACHINI 

tANGUAGl 

GUlDt 

fl     \ 

^--..i>^.... 

Contents  jnclude  sections  on: 
•input  and  output  rautirnes. 
•l   ixcd  point,  floating  point, 

iind  AsGii  nwrnbcr  convor^ior^. 
*ClocUs  and  timers. 
•Ouilt-in  arithmetic  functions. 
•  (*iogfdniniiiig  lijnts  and  sugges- 

lions. 
*Many  sample  pirograms- 

Whilo  supply  lasls; 

Guides  for  Old  ROMS 

only  S5  00  tnc   poslage 

New  ROMS  order  below 


If  you  are  interested  in  or  are  already  into  machine  language 
programming  on  the  PET,  thtn  this  invaluable  guide  is  for 
you.  More  than  30  ol  the  PET's  buillin  routines  are  fully 
detailed  so  that  th'!  reader  can  immediately  put  them  to  good 
use- 
Available  for  $6.95  *  .75  postage.  Michigan  residpnts  please 
include  4%  state  sales  tax.  VISA  and  Masterrharge  cards 
accepted  give  card  nurnbcr  and  expiration  date.  Quantity 
drscounts  are  available. 


iilliii;!! 


ABACUS  SOFTWARE 

P.  0.   Box   7211 

Grand   Ranids,  Michigan 


49510 
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Un-Compacfor 


Robert  W,  Baker 
Atco,  NJ 

Since  my  Compactor  program  was  published  in  the 
Nov./Dec,  '80  issue  of  COMPUTE!,  I've  had  several 
requests  for  a  companion  program  to  un-Compact 
programs.  The  program  shown  here  will  do  just 
that! 

The  program  reads  a  BASIC  program  file 
from  disk  on  drive  0  and  creates  a  new  copy  on 
drive  1 .  The  new  program  filename  is  the  same  as 
the  original  except  for  a  "/U"  suffix  to  indicate  an 
un-compacted  version.  As  with  Compactor,  load 
the  newly  created  program  file  and  enter  a  CLR 
command  from  the  keyboard  to  correct  the  pro- 
gram links.  Then  save  the  program  back  to  disk  as 
usual.  Un-compactor  does  not  generate  correct 
link  values  when  writing  the  new  program  file,  it 
merely  writes  a  dummy  value  to  reserve  space  for  a 
link.  This  saves  a  fair  amount  of  extra  work  not 
really  needed  in  the  program.  The  CLR  command 
will  force  BASIC  to  correct  the  program  links  for 
you. 

The  program  takes  any  multi-statement  lines 
(statements  separated  by  colons)  and  breaks  them 
into  separate  program  lines  with  new  line  numbers. 
The  new  line  numbers  are  generated  by  adding 
one  to  the  original  line  for  each  new  line  generated. 
This  procedure  is  followed  for  however  many 
statements  exist  in  the  line,  as  long  as  new  line 
numbers  can  be  generated  without  reaching  the 
next  line  number  in  the  original  program.  If  that 
point  is  reached,  the  remainder  of  the  original  line 
is  then  copied  as  part  of  the  last  line  generated 
with  any  appropriate  separating  colons. 

The  program  must  take  into  account  certain 
BASIC  tokens  or  keywords  since  they  effect  wheth- 
er or  not  a  particular  line  can  be  broken  into 
separate  lines.  Thus,  any  data  following  a  GOTO, 
END,  RUN,  IF,  RETURN,  REM,  STOP,  LIST,  or 
CONT  token  is  copied  unchanged  to  the  end  of 
the  current  program  line.  Also,  once  a  quote  is 
detected,  the  line  must  be  copied  until  another 
quote  or  end  of  the  program  line  is  reached. 

Hope  this  proves  to  be  of  help,  especially  to 
those  currently  using  Compactor.  This  program 
allows  you  to  effectively  re-create  programs  that 
were  compacted.  Now  you  can  get  a  compacted 
program  in  Un-compactor  to  help  speed  up  pro- 
gram execution.  As  usual,  I'll  supply  copies  of  the 
program  on  cassette  for  $2  to  cover  costs. 


10 

FOR  K=l 

TO  10 

11 

PRINT  X 

12 

NEXT 

20 

PRINT 

21 

PRINT 

22 

PRINT 

30 

REM  TES 

r  FILE  FOP 

UNl 

ONF 

40 

R=l 

41 

E=2 

42 

C=3 

43 

ri=4 

44 

E=5T=6 

■  G=7 

45 

X=10 

46 

V=20 

47 

Z=30 

188  EHII--THHT  ALL! 

REHliV. 

~  SAMPLE  Ll: 

STING 

OUTPUT  FILE 

FROM  UNCO 

MPRCTOR 

10 

20 
■30 
40 
45 
1 68 


FOR   '■<=!    TO    10:    PRINT   )<■    NEXT 
PR  I  NT  :  PR  I  NT  •■  PR  I  NT 
REM   TEST   FILE   FOR  UNCOMPRCTOR 
fl=  1  ■■  E=2  :  C=3  ■■  D=4  ■  E=5  :  F=-b  :  G=7 
X=10:V=20:Z=30 
ENIi^THRT  HLL! 


RERDV. 

-  SAMPLE  LISTING 

INPUT  FILE  TO  UNCOMPRCTOR 

30  REM  UN  -  COMPACTOR 

50  REM       BY:  ROBERT  W.  BAKl^R 

70  REM  15  WINDSOR  DR.,  ATCO,  IW  08004 

100  : 

110  GOTO  270 

120  : 

130  REM  >>>>>>  SUBROUTINES  <<<<<<< 

140  : 

150  GOSUB  160:  V1=V 

160  GETtt5,C$:  GOSUB  190 

17  0  IF  C$=""  THEN  V=0:  RETURN 

180  V=ASC(C$):  RETURN 

190  INPUT#15,EN,EM$,ET,ES 

200  IF  EN=0  THEM  RETURN 

210  PRINT  "RrDISK  ERROR": PRINT 

220  PRINT  EN;EM?;ET;ES 

230  GOTO  1030 

240  : 

250  REM  *****  INITIALIZATION  ***** 

260  : 

270  PRINT"fi";SPC(10)  ;  "xUN-COMPACTOR^-^ 

280  PRINT"  rINPUTf  FILE  IN  rDiUVE  #0^ 

290  PRINT"xOUTPUTf  FILE  IN  L.DMVE    ^IH 

300  INPUT"j:INPUT  FILENAME?  ";F::.5 

310  DIM  C(256) 

320  OPEN  15,8,15 

330  OPEN  5,8,5, "0: "+FL?+",P,R" 

340  GOSUB  190 

350  PRINT:  PRINT  "OK,  WORKING  0>I  LINE*  -. 

- ^ 

360  F0$  =  LEFT.?(FLS,14)+"/U" 
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370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 

600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 

750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 
860 
870 
880 
890 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
READY 


PRINT#15, "S1:"+F0$ 

OPEN  6,8,6,"l:"+FO$+",P,W" 

GOSUB  190 

GOSUB  150:  PRINT#6 , CHR$ ( VI ) ;C$ ; 

F=l:  GOTO  580 


REM 


OUTPUT  THIS  LINE# 


LN=NL:  IF  LK=0  THE^3  1010 
PRINT  LN, 

PRINT#6,CHR$(1) ;CHR$(1) ; 
PRINT#6,CHR$(LL) ;CHR$(LH) ; 

REM  *****  READ  THIS  BASIC  PGM  LINE 

X=l 

GOSUB  160:  C(X)=V 

IF  V>0  THEN  X=X+1:  GOTO  530 

REM  *****  GET  NEXT  LINK  &  LINE* 

GOSUB  150:  LK=V+Vl :  IF  LK=0  THEN  600 
GOSUB  150:  NL=V1+ (256*V) :  LL=V1 : 

-.  LH=V 
IF  F  THEN  F=0:  GOTO  450 

REM  *****  BREAK  UP  LINE  IF  POSSIBLE 

X=l 

REM  SKIP  IF  NOT  COLON 

IF  C(X)  058  THEN  810 

IF  X=l  THEN  950 

LN=LN+1:  IF  LN>=NL  THEN  950 

PRINT#6,CHR$(0) ;CHRS(1) ;CHR$(1) ; 

H=INT(LN/256) :  L=LN-(256*H) 

PRINT#6,CHR5(L) ;CHR${H) ; 

X=X+1:  IF  C(X)=32  OR  C(X)=58  THEN  -. 

-.740 
GOTO  6  80 

REM  COPY  REST  OF  LINE  IF  

REM   GOTO,  END,  RUN,  IF,  RETURN 
REM   REM,  STOP,  LIST,  CONT 

IF  C(X)<128  OR  C(X)>155  THEN  910 

IF  C(X)=128  OR  C(X)>153  THEN  850 

IF  CCXX137  OR  C(X)>144  THEN  910 

IF  C(X)=140  OR  C(X)=141  THEN  910 
PRINT#6,CHR$(CCX) ) ; 

IF  C(X)>0  THEN  X=X+1:  GOTO  850 
GOTO  450 

REM  SKIP  IF  NOT  QUOTE 

IF  C(X)  034  THEN  950 

PRINT#6,CHR$(C(X) ) ;  :  X=X+1 

IF  C(X)=34  OR  C(X)=0  THEN  950 

GOTO  920 

PRINT#6,CHRS(C(X)  )  ; 

IF  C(X)>0  THEN  X=X+1:  GOTO  680 

GOTO  450 

REM  ***  END  OF  BASIC  PROGRAM 

PRINT#6,CHR$(0)  ;  CHR$  (  0  IM- 
PRINT" fixDONE"  : PRINT: PRINT 
CLOSE  5:  CLOSE  6:  CLOSE  15 


Every  PET" 
Needs  a  Friend. 


CURSOR  is  the  best  friend  your  Commodore  PET  will  ever 
have.  Since  July,  1978  we  have  published  150  of  (he  most 
user-friendly  programs  for  the  PET  available  anywhere. 
When  we  write  or  edit  a  program,  we  spend  lots  of  time 
fussing  about  how  it  will  treat  you.  We  pay  attention  to  lots 
of  little  things  that  help  make  using  a  computer  a  pleasure 
instead  of  a  pain. 

Naturally,  CURSOR  programs  are  technically  excellent. 
Each  program  that  we  purchase  is  extensively  edited  or  re- 
written by  a  professional  programmer.  But  imag/nafjon  is 
just  as  important  as  being  user-friendly  and  technically 
good!  We  delight  in  bringing  you  off-beat,  unusual 
programs  that  "show  off"  the  abilities  of  your  PETorCBM. 

CURSOR  is  user-friendly,  technically  great  and  full  of 
imaginative  programs.  And  every  issue  of  CURSOR  is  still 
available!  We  continue  to  upgrade  previously  published 
programs  so  thai  they'll  work  on  the  three  varieties  of 
Commodore  ROM's  (Old,  New,  and  4.0).  New  issues  also 
work  on  the  80  column  CBM. 

For  only  $4.95  you  can  buy  a  sample  issue  and  judge  for 
yourself.  Or  send  $27  for  a  six-issue  subscription.  Each 
CURSOR  comes  to  you  as  a  C-30  cassette  with  five 
programs  and  a  graphic  Front  Cover,  ready  to  LOAD  and 
RUN  on  your  PET. 

Who  knows?  After  your  PET  meets  CURSOR,  things  may 
never  be  the  same! 
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Rcyidiny.  Berkshire 

SYSTEMS  FORMULATE  Corp. 
Shin-Makicho  BIdg.,  1-8-17 
Vaesu.  Chuo-Ku.  Tokyo  103 


theCODE 
WORKS 


Box  550 

Goleta,  CA  93116 

805-683-1585 


126 


COMPUTE! 


May,  1981,  Issue  12. 


Using  ttie 
Hardware 
Intemipt  Veclor 
onfhePet 

Eric  Brandon 

The  operating  system  of  the  PET  is  divided  into 
several  distinct  parts.  Some  of  these  get  and  process 
your  BASIC  statements;  others  deal  with  all  Input/ 
Output  operations,  and  some  update  the  clock, 
flash  the  cursor  and  take  care  of  other  sundry 
details  every  60th  of  a  second.  This  article  will 
show  you  how  to  change  the  operation  of  the  latter 
to  suit  your  own  needs. 

Every  60th  of  a  second  the  PET  gets  a  signal 
on  its  IRQ  interrupt.  When  this  occurs,  it  saves  all 
registers  and  goes  to  the  memory  locations  specified 
in  locations  537  and  538  (144  and  145  on  new 
ROMs).  It  executes  the  machine  language  program 
there,  and  upon  hitting  an  RTI  instruction,  reloads 
all  of  its  registers  and  continues  with  whatever  it 
was  doing.  By  changing  the  hardware  Interrupt 
Vector  at  537  and  538  (144  and  145  new  ROMs) 
we  can  make  the  PET  execute  our  program  every 
60th  of  a  second,  while  BASIC  operates  normally. 

I  have  included  here  two  sample  programs 
using  this  technique,  one  is  for  ROM  2.0  (old 
ROMs)  and  the  other  is  for  ROM  3.0.  What  they 
do,  is  that  after  a  SYS  826,  the  contents  of  the 
BASIC  Input  Buffer  are  constantly  displayed  on 
the  top  two  lines  of  the  screen.  Hitting  the  amper- 
sand (&),  BREAKs  the  machine  language  program, 
and  hitting  the  slash  to  the  right  of  the  ampersand 
on  the  keyboard,  clears  the  buffer  if  you  find  that 
it  is  getting  too  cluttered.  These  programs  were 
written  only  as  examples  of  using  the  Hardware 
Interrupt  Vector  and  are  meant  to  show  you  how 
to  use  this  with  your  own  programs.  Before  we 
proceed,  I  wish  to  clarify  just  one  feature  of  my 
assembler;  the  plus  sign  on  lines  1 1  and  37  means 
add  one  to  the  value  of  the  symbol.  On  most 
assemblers  this  should  be  substituted  with  HIV    1 . 

Lines  2-6  simply  set  the  values  of  some  symbols. 
INBUF  is  the  first  memory  location  of  the  BASIC 
Input  Buffer.  KEY  is  the  location  that  contains  the 
keyboard  matrix  value  of  the  key  presently  de- 
pressed, INTRPT  is  the  routine  to  which  the 
Hardware  Interrupt  Vector  usually  points.  HIV  is 
the  location  of  the  first  byte  of  the  two  byte  Hard- 
ware Interrupt  Vector.  Finally,  SCRN  is  the  top 
lefthand  corner  of  the  screen. 


Lines  7-13  are  essential  and  should  be  looked 
at  in  detail.  Line  7  has  the  Set  Interrujjt  Mask 
instruction.  This  is  necessary  to  prevent  the  PET 
from  being  interrupted  with  only  one  byte  of  the 
pointer  changed.  Line  12  clears  the  interrupt 
mask.  If  the  mask  wouldn't  be  cleared,  the  PET 
would  "hang  up"  and  need  to  be  turn«;d  off.  Lines 
8—1 1  make  the  pointer  point  to  0347  (0345  new 
ROMs).  Note  that  the  least  significant  byte  goes  in 
537  ( 1 44  new  ROMs) ,  and  that  the  most  significannt 
byte  goes  in  538  (145  new  ROMs).  Thi;  RTS  in  line 
13  returns  you  to  BASIC  after  your  SYS.  The 
effect  of  an  SYS  826  is  to  make  the  cursor  reappear 
nearly  immediately,  but  now  the  PET  executes  the 
machine  language  program  at  0347  (0345  new 
ROMs)  every  60thy  of  a  second.  The  actual  opera- 
tion of  the  program  is  quite  straightforward  to 
anyone  familiar  with  machine  language 
programming. 

Lines  33—39  are  the  standard  procedure  for 
setting  the  Hardware  Interrupt  Vector  back  to 
normal.  Note  that  POKE  537.133:POKE  538,230 
(POKE  144,46:POKE  145,230  new  ROMs)  has  the 
same  effect.  This  procedure  must  be  clone  before 
any  cassette  I/O. 

The  last  thing  that  deserves  notice  are  lines 
25,32,  and  39.  The  only  safe  way  to  leave  a  program 
that  has  been  called  by  the  Hardware  Interrupt 
Vector  is  to  jump  somewhere  into  the  interrupt 
handhng  routine.  Since  it  begins  at  E685  (E62E 
new  ROMs),  that  is  where  you  will  most  often  go. 
You  cannot  end  your  program  with  a  RTS  or 
a  BRK. 

I  learned  this  technique  from  disassembling 
KEYPRINT  by  Charles  Brannonn,  a  program  in  a 
previous  issue  of  COMPUTE!.  I  hope  you  find  this 
useful,  and  if  you  have  any  questions,  you  can 
write  me  at: 

Eric  Brandon 

36  Hartfield  Road 

Islington,  Ontario 

Canada 
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Odds  &  Ends  on  the  2040  Disk 

Jim  Butterfield 

The  disk's  ID  is  written  over  600  times.  There's  no 
quick,  way  of  changing  it  — just  copy  everything 
over  to  a  new  disk  if  you  really  need  to  do  this. 

Odds  &  Ends  on  the  2040  Disk 

Jim  Butterfield 

Yes,  the  disk  checks  every  read  by  using  a  checksum. 

You  can  depend  on  a  good  read  being  correct. 
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Pet  As  An 
IEEE-488  Logic 
Analyzer 

Jim  Butterfield 
Toronto,  Conodo 

If  you'd  like  to  see  what's  going  on  on  the  GPIB  — 
and  if  you  can  borrow  an  extra  PET  and  IEEE  inter- 
face cable  —  this  program  will  help. 

It  shows  the  current  status  of  four  of  the  GPIB 
control  lines,  plus  a  log  of  the  last  nine  characters 
transmitted  on  the  bus. 

The  four  control  lines  are  NRFD,  NDAC, 
DAV,  and  EOI.  It  would  be  nice  to  show  ATN  too, 
but  I  couldn't  fit  this  in;  it's  detected  in  a  rather  odd 
way  in  the  PET  so  that  fitting  it  in  is  rather  too  tricky 
for  this  simple  program. 

The  last  nine  characters  are  shown  in  "screen 
format".  This  means  that  you'll  have  to  do  a  little 
translation  work  to  sort  out  what  some  of  them 
mean.  On  the  other  hand,  it  allows  you  to  see  charac- 
ters that  otherwise  wouldn't  be  printed.  A  carriage 
return,  for  example,  shows  up  as  a  lower  case  m;  this 


is  a  little  confusing  at  the  start,  but  you'll  quickly  get 
used  to  it  and  it's  handy  to  see  everything  that  goes 
through.  Don't  forget  that  original  model  PETs  may 
show  upper  and  lower  case  reversed. 

I  had  hoped  to  show  which  characters  were  ac- 
companied by  the  EOI  signal.  It  turned  out  that 
time  is  critical  —  the  bus  works  very  fa^it  —  and  that 
adding  this  feature  would  cut  down  the  number  of 
displayed  characters  from  nine  to  fivt:.  I  opted  for 
the  bigger  count,  and  dropped  the  EOI  log  feature. 

The  high  speed  of  the  bus  makes  it  difficult  to 
watch  the  control  lines  in  real  time.  V/hen  the  "ac- 
tive" PET  is  exchanging  information  with  disk  or 
printer  everything  is  happening  very  fast,  and  the 
"logic  analyzer"  PET  will  show  an  ama,?ing  flurry  of 
activity  on  the  control  lines.  Only  when  the  activity 
Slops  or  hangs  up  will  you  be  able  to  see  the  lines  in 
their  static  conditions.  | 

You  may  use  the  program  to  chase  down  real 
GPIB  problems,  or  just  to  gain  insight  on  how  the 
bus  works.  Either  way,  it  will  come  in  handy  if  you 
can  borrow  that  extra  PET  unit. 

Even  at  the  speed  of  program  operation,  a  few 
signals  come  too  fast  to  catch  on  the  fly.  If  you  must 
see  everything  in  the  select  and  unselect  sequences, 
you'll  have  to  cut  down  the  number  of  characters 
displayes.  Try  changing  the  contents  of  $04F0  to, 
say,  5  if  you  want  to  do  this. 
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Odds  &  Ends  on  the  2040  Disk 

Jim  Butterfield 

Yes,  the  disk  checks  every  write  by  reading  the 
block  back  and  verifying  every  byte  for  correctness. 
You  can  depend  on  a  good  write  having  gotten  to 
the  diskette  correctly. 

Odds  &  Ends  on  the  2040  Disk 

Jim  Butterfield 

The  first  files  written  to  disk  will  cluster  around 
track  18,  the  directory  track.  This  mininriizes  head 
movement  on  a  lightly-used  disk.  By  the  same 
token,  you  might  arrange  to  write  your  most-used 
programs  and  Files  first  on  the  disk,  to  save  both 
time  and  wear  and  tear. 
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=  MBom^eirifiM  PET  Products 

from 

OPJimiZED  DATA  SYSTEMSl 


-SOFTWARE   FOR   ALL  PET/CBMs- 
(Supplied  on  Cassette-Prices  include  Shipping) 

•  WORD  PROCESSOR  (PS-001) S1B.95 

Makes  documents  i  snap 

•  MAILING  LIST  IPS^)02) S1B.9S 

Throw  away  your  address  book 

•  SPACE  EATER  (PS003I S9.95 

Gobbles  ipseei  in  BASIC  prooramf 

•  CATALOG  IPS^Ml S16.95 

File  stamp/coin/etc.  collecTions 

•  SATELLITE  TRACKER  IPSOOSI S24.95 

TfiCkJ  OSCAR  Ham  Satellite  in  real  time 

MORSE  CODE  KEYER  {PS-0061 S14.9S 

Sends  code  on  the  air  or  for  practice 
MINI-COUNT^  "  (PS-0071 $19.95 

Measures  frequency  to  17KHz  and  intervals  to  65  msec 


.i'" 
/• 


-HARDWARE  FOR  "OLD"  8K  PETS- 
(Shipping  Additional) 

2114  RAM  ADAPTER 1+ $1.50  per  order) 

Replaces  up  to  BeSSOs  with  low  cost,  reliable  2114s 


PHK.001  (Kit-2socketsl  . 
PHK.001S  (Kit-8  sockets) 


SI  3.95 
S1B.2B 


PHB-001  (Bare  PCBl  ,  .  .  .$8.95 
PH001S  lAssmsockcts 

onlyl $22.95 

PH-001  IAiim-2  sockets  tone  2114) $24.95 

4K  MEMORY  EXPANSION (+  $3  per  order) 

Installs  easily  inlernally.  Uses  21 14s.  Write  Protect. 


PHB002  (Bare  PCBt  .  . 

PH-002S  (Atimsockets 

only) 


.516 
.S42 


PHK.0Q2  (Kit-sockets  only) S29 

PH^)02  (Full  Assml S105 


PROMPT  SHIPMENT!  SATISFACTION  GUARANTEED 

Caht.  Reudents,  add  6%  Tax 

P.O.  BoK  595,  Dept.  C  -  Placemia,  California  92670 


MINI  COUNT  Tfademafk  o'  Opumiied  Data  Svstems 
PET/CBM  Trademark  ol  Commodore  BttsiriBss  Machines 
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Running 
40  Column 
Programs  On 
A  CBM  8032 

Chuan  Chee 
St,  Catherine's 
Ontario  Canada 

Good  news  for  those  who  own  a  Commodore 
80  column  CBM.  I  have  developed  a  method 
of  making  the  computer  act  almost  like  a  40 
column  PET. 

Over  the  years,  many  programs  have  been 
developed  for  PET  2001  computers.  There  had 
been  one  ROM  upgrade  from  BASIC  1.0  to  2.0 
but  many  people  and  software  companies  got  over 
that  hurdle.  Now  Commodore  has  introduced  a 
BASIC  4.0  for  their  PET  40XX  and  CBM  80XX 
computers.  Again  many  programmers  must 
change  any  SYS  commands  into  the  ROM  locations. 
However,  some  programs  can  still  run  on  the  PET 
40XX  because  the  programmers  were  careful 
enough  to  avoid  any  of  the  ROM  routines;  especially 
the  BASIC  part  as  opposed  to  the  Operating 
System.  Luckily,  most  of  the  first  1024  bytes  re- 
mained the  same  as  promised  by  Commodore. 

80  Column  Problem 

But  hold  on  before  you  start  attacking  your  pro- 
grams, the  CBM  80XX  is  a  completely  different 
animal  —  it  has  an  80  column  CRT  (or  screen).  All 
the  programs  are  assiuning  that  there  are  40  bytes 
per  line  as  in  the  case  of  a  PET,  but  a  CBM  has  80. 
Therefore,  any  programs  that  store  characters  on 
the  CRT  memory  will  have  every  other  line  on 
columns  41  to  80.  This  is  certainly  a  dissaster. 

The  Solution 

In  solving  this  problem,  there  must  be  some  way  of 
convincing  the  microcomputer  that  there  are  only 
40  bytes  per  line  as  in  the  PET.  Commodore  was 
wise  enough  to  implement  their  newly  developed 
Video  Interface  Controller  (or  CRT  Controller) 
into  the  CBM.  They  are  also  using  this  chip  in  the 
VIC  20  (Video  Interface  Computer).  When  the 
power  is  turned  on,  the  operating  system  instructs 
the  chip  to  do  various  functions  such  as  the  height 
of  the  25  lines  in  normal  or  graphics  modes.  My 
program  instructs  the  Controller  to  display  40 
bytes  per  line  and  shift  the  first  column  to  the  right 
to  center  the  display  instead  of  being  on  the  left 
side  of  the  CRT. 


That  is  just  fine  for  the  program.'  that  store 
characters  on  the  CRT.  But  what  about  tho.se  that 
simply  PRINT.  Now  whenever  the  PRINT  finishes 
a  line  (40  characters)  of  output,  the  ROM  routines 
will  make  the  next  PRINT  occur  80  bytes  from  the 
start  of  the  current  PRINT  line.  This  will  make  the 
output  appear  on  every  other  line. 

Well,  there  just  happens  to  be  an  "Output  a 
byte  on  the  CRT"  jump  vector  at  local  ions  $00EB 
to  $00EC.  The  CBM  4032  program  will  change 
this  vector  to  intercept  any  character  before  it  gets 
printed.  The  routines  included  in  the  program 
were  modified  from  a  PET  4032  Operating  System 
ROM,  set  so  that  it  will  behave  exactly  like  a  40 
column  PET.  It  will  handle  RETURN,  cursor 
movements,  INST,  DEL,  and  even  wrap  around 
lines  properly. 

Bonuses  Not  Available  On  A  Pet 

There  are  several  features  that  make  this  simulation 
of  a  PET  40XX  even  better  since  they  are  not 
available  on  any  PET  computer.  Such  bonuses 
include  the  automatic  repeat  of  the  ci  rsor  control 
and  editing  keys  and  the  use  of  the  REPEAT  key 
with  all  other  keys.  There  will  aLso  be  ;he  usual 
warning  "bell"  when  six  characters  from  the  end  of 
the  line.  To  disable  the  "bell",  type  POKE  231.0. 
This  RAM  location  contains  the  duration  time  of 
the  "bell"  which  usually  is  16.  Try  poking  various 
values  and  notice  how  the  duration  changes. 

I  also  decided  to  keep  the  functions  of  "^"  and 
":"  during  scrolling  the  same  as  before  because 
those  who  are  used  to  them  should  not  have  to  use 
the  RVS  key.  Along  the  same  lines,  the  ESC  key  is 
still  fully  functional.  By  the  way,  did  you  know  that 
the  ESC  key  not  only  gets  you  out  of  quote  and 
insert  modes  but  also  the  rever.se  mode,  thus 
functioning  similar  to  the  OFF  key? 

Hie  CBM  4032  Program 

The  program  is  in  two  parts  —  a  BASIC]  and  a  data 
part.  After  tinning  on  the  computer  cr  typing 
NEW,  type  in  the  BASIC  part  exactly  as  shown 
without  any  extra  spaces.  LIST  it  agai  i  to  be  sure. 
Next,  get  into  the  Machine  Language  Monitor  by 
SYS4  and  type  in  the  data,  making  sure  not  to 
make  any  mistakes.  The  next  im porta  lU  step  is  to 
save  the  program  through  the  Monitor  by  .S 
"0:CBM  4032",08,0400,07A8  for  a  dii.k  drive  or  .S 
"CBM  4032",0i  .0400,07A8  for  a  tape  cassette 
drive.  Now'  exit  the  Monitor  and  prepuc  to  RUN 
the  program. 

The  data  is  actually  the  machine  I  utguage 
routines  required.  Ihe  B.A.SIC  portion  will  transfer 
it  into  the  second  half  of  the  2K  CRT  memory.  As 
it  transfers  the  data,  you  will  sec  "garbage"  appear 
on  the  CRT.  This  is  an  ideal  spot  to  put  the  routines 
because  the  CRT  will  only  use  40  byte.s  per  line  by 
25  lines  (=1000  bytes),  the  second  half  of  the  CRT 
memory  will  never  be  printed  on. 
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After  the  transfer,  the  BASIC  portion  will  SYS 
33876  ($8454)  to  have  the  routines  set  up  the 
necessary  parameters.  It  will  give  the  CRT  Con- 
troller the  proper  instructions  and  then  CLR  the 
CRT.  A  READY,  will  appear  on  the  CRT  and 
control  is  returned  to  the  user.  Now  you  are  ready 
to  RUN  any  programs  meant  for  a  40  column  PET 
with  the  proper  ROM  charges  if  necessary. 

If  for  any  reason  you  wish  to  go  back  to  the 
original  80  column  format,  you  can  switch  off  and 
on  the  CBM.  Alternatively,  you  can  type  SYS 
58982  ($E666)  and  press  both  SHIFTs  and  the 
quote  keys  simultaneously.  The  latter  method  will 
again  display  the  data  on  the  second  half  of  the 
CRT  but  you  risk  printing  or  typing  over  it. 

Conclusion 

Essentially,  any  program  that  can  RUN  on  a  PET 
40XX,  that  is  with  BASIC  4.0,  will  work  with  this 
program.  There  is  no  need  to  alter  the  program  to 
add  anything  extra  to  the  programs  to  artificially 
perform  what  this  program  does.  The  only  side 
effect  is  that  the  characters  appear  narrower  than 
usual  but  the  advantage  of  having  the  program 
displayed  far  exceeds  this  small  deviation. 

I  would  like  to  thank  Batteries  included,  in 
Toronto  for  allowing  me  to  use  their  computers 
for  the  development  of  this  program. 

10  REM  *  CBM  4032  -  BY  CHUAN  CHEE  * 
20  REM  SEE  ARTICLE  IN  COMPUTE! 
30  A=32672:FORI=1 136T01998: 

P0KEI+A,PEEKCI):NEXT:SYS33876 
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D8 
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COMPUTE! 

May,  19S1,  Issue  12. 

863B 

90 
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D8 

STX 

$D8 

867B 

• 

4C 

A9 

84 

JMP 

$84A9 
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8686 
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868B 
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C4 
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$C4 

868F 

A9 
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LDA 

#$80 

8691 

85 
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$C8 

8693 

85 

C5 
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$C5 

8695 

A9 
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B1 

C7 
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Build  Your  Own 
Controllers 

Nuts  And  Volts 

Gene  Zumchak 
Parti 

If  you  have  a  personal  computer  of  any  kind,  you 
probably  already  appreciate  the  power  of  a  general- 
purpose  computer  system  to  serve  as  a  controller. 
While  tying  up  your  APPLE  or  PET  to  control  the 
thermostat  may  not  seem  overly  attractive,  you  can 
usually  try  out  a  control  idea  or  scheme  using  your 
existing  computer  system  and  small  amount  of 
custom  I/O.  Eventually,  however,  you  will  want  to 
dedicate  a  separate  computer  system  to  your 
controller  application. 

It  wasn't  so  long  ago  that  such  a  thought 
would  be  prohibitive.  Computer  systems  wore 
dream  machines  that  cost  several  thousands  of 
dollars.  Of  course,  if  you  have  a  console  type 
computer  system  which  includes  a  CRT  and  per- 
haps one  or  more  disks,  then  your  console  system 
can  easily  cost  three  or  more  thousand  dollars.  On 
the  other  hand,  a  great  many  controller  applications 
require  little  more  than  a  handful  of  chips  that  cost 
well  under  $100.  In  fact,  if  your  application  has 
any  merit  and  a  significant  market,  it  may  be  quite 
possible  to  integrate  the  design  into  a  single-chip 
microcomputer  costing  only  a  couple  of  dollars, 
and  you  can  be  on  your  way  to  making  your  first 
million. 

While  your  particular  application  may  never 
make  you  rich,  it  is  fairly  easy  to  put  together  a 
prototype  or  a  one-of-a-kind  microcontroller 
system  for  a  reasonable  price.  A  6502  will  cost  less 
than  $10.  A  2716  will  cost  about  the  same.  Figure 
$5  for  a  128  X  8  RAM  chip,  (Motorola  6810),  or  $8 
for  a  pair  of  21 14's  for  IK  of  RAM.  A  6522  for  $8 
will  provide  sixteen  bits  of  I/O  and  a  pair  of  timers 
(suitable  for  a  real-time  clock).  Finally,  a  few  more 
dollars  for  a  crystal  and  some  TTL  for  address 
decoding,  and  the  electronic  parts  cost  will  come  to 
not  much  more  than  $50. 

If  the  parts  really  cost  as  little  as  mendoned, 
what's  to  prevent  anyone  with  a  little  knowledge  of 
computers  from  designing  and  building  his  own 
microcontrollers?  The  answer  is  absolutely  nothing. 


But  there  is  one  small  catch.  While  the  cost  of  the 
end  product  may  be  minimal  or  even  negligible, 
most  companies  or  individuals  who  d<.\sign  micro- 
computer systems  do  it  with  the  aid  ol  a  micropro- 
cessor "development  system".  Commercial  devel- 
opment systems  start  at  about  $5,000,  but  typically 
range  from  $  1 5,000  to  $25,000. 

In  my  book,  Microcomputer  Design  and 
Troubleshooting,  which  is  being  typeset  and  will 
be  in  print  in  the  Fall  (Howard  Sams,  and  the 
Blacksburg  Series),  I  address  the  quesuon  of  what 
comprises  a  typical  development  system,  but  more 
importantly,  what  is  minimally  required  to  put 
together  your  own  low-budget  development 
system.  While  the  reader  will  want  to   ead  about 
the  details  in  the  book  when  it  is  published,  the 
highlights  of  that  discussion  will  be  brought  out 
here,  in  this  first  installment  of  several  in  which  I 
will  outline  the  procedures  and  equipment  neces- 
sary to  put  together  and  bring  up,  your  own 
microcomputer  controllers. 

The  Development  System 

A  development  system  is  the  hardware  and  software 
required  to  check  out  and  debug  both  the  hardware 
and  software  of  a  prototype  micropro.-essor  system. 
Ironically,  the  hardware  and  software  debugging 
capabilities  are  not  always  reflected  by  the  systems 
very  high  cost.  Software  debugging  capabilities  are 
usually  satisfactory,  provided  that  the  system  has 
an  "optional"  processor  emulator  module  which 
typically  costs  $2,000  or  more.  Even  with  the 
emulator,  the  hardware  debugging  capabilities 
may  be  mediocre  at  best. 

Typically,  a  commercial  development  system 
consists  of  the  following  items: 

1.  Microcomputer  with  software 

2.  Console  device  (CRT  or  Teletypewriter) 

3.  RAM  memory  blocks 

4.  Floppy  disk(s) 
SPrinter 

6.  EPROM  programmer  (with  soi  tware) 

7.  Emulator  (processor) 

Why  sliould  such  a  system  cost  $15,0(i()?  The 
rea.son  for  the  high  cost  is  the  law  of  supply  and 
demand;  there  just  aren't  that  many  people  in  the 
world  who  need  a  microprocessor  development 
system.  However,  except  for  some  specialized 
software  like  an  editor  and  assembler,  the  first  five 
items  in  the  list  are  not  appreciably  di  iferent  than 
what  you  gel  in  a  BASIC  oriented  console  computer 
system  like  a  PET  or  APPLE.  And,  of  course. 
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VAK-i  MOTHERBOARD 


We  also  carry: 

SYM-1  $229"' 

AIM-65W/1K      aSS""" 
AIM-65W/4K      439"'' 

We  also  do  custom 
hardware  and  soft- 
ware for  tfie  6502 
microprocessor 


PRICE:  Sisgo" 

Call  or  write  for 
shipping  charges 
and  our  complete 
catalog. 


The  VAK-1  was  specifically  designed  for  use  with  the  KIIVI-1,  SYM-1  and  the  AIM  65  MicrocomputerSystems. 
The  VAK-1  uses  the  KIM-4*  Bus  Structure,  because  it  is  the  only  popular  Multl-Sourced  bus  whose  expansion 
boards  were  designed  specifically  for  the  6502  Microprocessor. 


SPECIFICATIONS: 

Complete  with  rigid  CARD-CAGE 

Assembled  (except  for  card-cage).   Burned  in  and  tested. 

All  IC's  are  in  sockets 

Fully  buffered  address  and  data  bus 

Uses  the  KIM-4*  Bus  (both  electrical  Pin-out  and  card  size)  for  expansion  board  slots 

Provides  8  slots  for  expansion  boards  on  1"  centers  to  allow  for  wire-wrap  boards 

Designed  for  use  with  a  Regulated  Power  Supply  (such  as  our  VAK-EPS)  but  has  provisions  for  adding 
regulators  for  use  with  an  unregulated  power  supply. 

Provides  separate  jacks  for  one  audio-cassette,  TTY  and  Power  Supply. 

Board  size:  14.5  in.  Long  x  11.5  in.  Wide  x  8  in.  High 

Power  requirements;  5V.DC  @  0.2  Amps. 

*  KIM-4  is  a  product  of  MOS  Technology/C.B.M. 


ENTERPRISES 

INtOBPORATEO 


2951  W.  Faifmount  Avenue 
Phoenix,  AZ  85017 
(602)  265-7564 


^^^^^^5         IMC&C 
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editors  and  assemblers  are  easy  to  come  by  for 
most  console  systems.  On  the  other  hand,  not 
many  microprocessor  development  systems  will 
allow  you  to  run  a  program  in  BASIC,  or  Pascal,  or 
FORTH.  In  other  words,  while  a  personal  computer 
can  be  turned  into  a  development  system,  a  devel- 
opment system  usually  does  not  make  a  very  good 
personal  computer.  It  should  be  made  clear, 
however,  that  a  personal  computer  is  not  a  devel- 
opment system  without  items  6  and  7  in  the  list 
above  (or  their  equivalent).  The  EPROM  program- 
mer is  easy.  Such  accessories  are  available  for  very 
reasonable  prices.  If  you  don't  mind  stuffing  a 
blank  board,  you  can  put  together  your  own 
universal  EPROM  programmer  for  less  than  $30. 
However,  the  "emulator"  function  is  not  quite  so 
available. 

The  function  of  an  emulator  is  to  provide  the 
prototype  controller  with  the  attributes  of  an 
operating  system.  Suppose  you  want  to  make  a 
controller  out  of  an  existing  single-board  computer 
like  a  KIM  or  SYM.  After  attaching  any  additional 
I/O  hardware  required,  you  can  hand  assemble  a 
controller  program  and  enter  it  into  the  KIM  or 
SYM's  RAM  using  its  btiilt-in  operating  system. 
Programs  under  development  can  be  saved  on 
tape.  Software  debug  functions  are  even  available 
to  get  the  program  running.  But  what  do  you  do  if 
your  prototype  controller  is  not  like  a  KIM  or 
SYM?  What  if  it  has  no  keyboard  or  display,  or  any 
means  (operating  system)  of  entering  i:  program 
into  itself?  There  are  two  solutions  to  this  problem. 
One  is  to  use  (abuse)  an  EPROM  progi  ammer. 
The  second  is  to  use  some  kind  of  emulator. 

The  first  solution  mentioned  is  actually  used 
by  owners  of  commercial  development  systems, 
who  do  not  have  an  emulator  module.  It  works  as 
follows.  First,  a  program  is  developed  and  entered 
into  RAM  in  the  development  system's  microcom- 
puter. The  RAM  contents  are  now  burned  into  an 
EPROM.  The  EPROM  is  now  plugged  into  the 
prototype  system  and  an  attempt  made  to  reset  the 
prototype  system  and  run  the  program.  If  the 
program  does  not  run  as  expected,  the  program  is 
modified  and  a  second  EPROM  is  prograrmned.  In 
the  meantime,  the  old  EPROM  is  being  erased. 
While  this  method  can  eventually  produce  a  work- 
ing program  it  is  very  tedious  and  ineffecient.  To 
give  you  some  iciea  of  how  really  duml>  this  method 
is,  consider  using  the  same  method  to  write  a 
program  in  BASIC.  That  is,  suppose  you  had  to 
enter  the  program  into  RAM,  burn  the  RAM 
contents  into  an  EPROM  and  then  plug  the  EPROM 
into  a  special  socket  to  try  out  your  program.  Yet 
that  is  essentially  what  many,  if  not  most,  people  do 
to  bring  up  controllers.  Clearly  there  must  be  a 
much  belter  way. 

The  second  approach  is  to  give  the  prototype 
system  a  virtual  operating  system  with  some  kind 


of  emulator.  Commercial  development  systems 
generally  emulate  the  prototype's  pnx  e.s.sor.  Such 
a  processor  emulator  is  a  very  complex  hardware 
and  software  system,  usually  requiring  two  or 
three  large  PC  boards  which  live  in  the  development 
system's  card  rack.  The  emulator  phy;  ically  con- 
nects to  the  prototype  via  a  cable  whicii  phigs  into 
the  prototype's  processor  socket.  The  development 
system  is  used  to  create  a  program  in  ii  block  of 
RAM.  The  emulator  allows  the  block  of  RAM  to  be 
executed  as  if  it  resided  in  the  prototype  system.  In 
addition,  the  program  can  be  stepped,  the  register 
contents  displayed,  breakpoints  set,  etc.  Effectively, 
the  emulator  runs  considerable  software  "in  the 
cracks"  between  prototype  program  instructions. 
One  consequent  limitation  of  this  scheme,  however, 
is  that  many  emulators  are  unable  to  execute 
prototype  programs  at  the  full  proces.sor  speed. 

While  a  processor  emulator  can  be  quite 
useful  for  debugging  software,  it  is  somewhat  less 
suitable  for  finding  hardware  bugs.  Unfortunately, 
many  users  attempt  to  debug  complicated  software 
before  even  knowing  whether  the  hardware  is 
100%  fimctional.  As  mentioned,  a  processor 
emulator  is  very  expensive,  typically  two  or  three 
thousand  dollars,  and  cannot  be  used  independ- 
ently of  the  development  system  for  which  it  was 
designed.  Fortunately,  another  kind  of  emulator 
can  be  built  that  is  usable  with  almost  any  computer 
system  having  an  operating  system,  including  one 
as  simple  as  a  KIM.  Instead  of  emulating  the 
prototype's  processor,  this  emulator  emulates  the 
prototype  system's  ROM  or  EPROM.  '.'.i  is  nothing 
more  than  a  small  block  of  RAM  that  can  be  alter- 
nately addressed  as  part  of  the  host  computer 
system,  or  via  the  EPROM  socket  in  the  prototype 
system.  Aside  from  the  fact  that  an  EPROM  emula- 
tor can  be  an  efficient  tool  for  debugging  both 
hardware  and  software,  the  best  thing  about  an 
EPROM  emulator  is  that  it  can  be  put  together  for 
less  than  $100. 

An  EPROM  emulator  is  used  as  follows.  A 
program  is  assembled  and  placed  into  the  emulator 
RAM  block  using  your  computer's  operating 
system.  Throwing  a  switch  on  the  emulator  now 
causes  the  RAM  block  to  be  atldressed  from  a  cable 
and  plug  inserted  into  the  empty  EPROM  .socket 
on  the  prototype  system.  If  a  cliange  i:;  required, 
the  switch  is  flipped  back  into  the  host  system 
position  and  any  changes  made  in  the  emulator 
RAM.  There  is  never  any  need  to  burn  an  EPROM 
until  the  program  is  completely  deluigged.  At  any 
|x)int  along  the  way,  the  RAM  contents  can  be 
preserved  on  tape  or  disk. 

In  the  next  column,  we  will  see  what  it  takes  to 
put  together  an  EPROM  emulator,  and  use  it  to 
debug  both  hardwaie  anfl  software.  A  very  work- 
able microprocessor  develojjment  system  can  be 
had  with  as  little  as  a  KIM,  an  EPROM  programmer. 


A  BRILLIANT  FUTURE  FOR  YOUR  AIM-65  WITH  THE  BANKER  MEMORY 


\k^  ' 


%   .     •  Your  36K  of  free  address 

jv  space  is  the  AIMs  most 

"■    #*-;  '       '  valuable  and  limited  re- 

'  .,'       .,•*    '     ■      *  source.  With  today's  large 

*'     '       .:  ^ '  capacity  RAM  boards,  ROM 

■     *      f  ■    *       '  >5$«e*       boards,  disk  systems,  video 

•  •  "  _  t^ftJKTf    boarcis,  and  other  expansion 

accessbries  it  is  easy  to  deplete 
•       ■  .    ■  this  resource  before  the  applica- 

tion requirement  is  satisfied.  MTU 
-  ■  .  has  solved  this  problem.         => 

THE  BANKER  MEMORY  contains  32K  of  RAM,  4  PROM  sockets  for  271 6/2732/2332,  a  PROM  programmer.  40  bits  of  parallel 
I/O  and  4  timers  from  two  6522  I/O  chips.  Addressing  is  extremely  flexible  with  the  RAM  inaependently  addressable  in  4K 
blocks,  PROf^/ls  independently  addressable,  and  I/O  addressable  anywhere  on  a  64  byte  boundary  (even  in  AIM'S  I/O  area  at 
AXXX  by  adding  a  single  jumper  to  the  AIM). 

This  may  sound  familiar,  but  read  on!  Unlike  other  AIM  compatible  memory  boards,  THE  BANKER  MEMORY  has  on-board  bank- 
switching  logic'  The  four  8K  blocks  of  RAM  plus  the  4  PROM  sockets  make  up  8  resources,  each  associated  with  a  bit  in  an 
Enable  Register.  Through  this  Enable  Register  resources'may  be  turned  on  and  off  under  software  control.  When  a  resource  is 
off,  its  address  space  is  freed  for  other  uses.  You  can  even  put  BANKER  resources  at  the  same  address  and  switch  among  them 
for' virtually  unlimited  RAM  and  P|tOM  expansion!  You  can  even  have  multiple  page  zeros  and  stacks!  Do  you  need  160K  byte  of 
memory?  It  only  takes  5  of  THE  BANKER  MEMORY  boards  and  you  end  up  with  5  page  zeros  and  stacks  to  boot! 

There's  more'  The  BANKER  MEMORY  also  incorporates  18  bit  addressing  which  allows  for  the  256K  address  spaces  of  the 
future  RAM,  PROM,  and  I/O  each  has  its  own  full  1 8  bit  address  decoder  which  allows  these  resources  to  be  in  different  64K 
banks  This  board  and  other  MTU  products,  such  as  our  320  by  200  dot  VISIBLE  MEMORY  and  Floppy  Disk  Controller  with  1 6K 
DMA  RAM,  can  turn  your  AIM  into  a  truly  powerful  65.02  computer  that  far  surpasses  the  packaged  systems  in  functional 
performance. 

INTRODUCTORY  SPECIAL  K-1 032-1  32K  BANKER  MEMORY  FULLY  ASSEMBLED  AND  TESTED  $395.00  ($450.00  as  of 
March  1 ,  1 980)  or  the  K-1 032-2  1 6K  RAM  only  with  bank  switching  and  1 8  bit  address  bus  only  $295.00 
Isn't  it  time  you  took  a  closer  look  at  MTU  —  we  offer  you  power  now  with  an  eye  to  the  future. 

WRITE  OR  CALL  TODAY  FOR  OUR  48  PAGE  FALL  1980  6502  CATALOG        ," 
--■■-^  International  requests  include  $1.00  ' 

VISA  and  MASTERCARD  accepted 


Photo  credit: 
SUPERNOVA  CRAB  NEBULA: 

Palomar  Observatory, 
California  Institute  of  Technology 


Micro  Technology  Unlimited 

r  Z806  Hillsborough  Street 
P.O.  Box  121 06 
Raleigh.  NC  27605.  U.S.A. 
igi  91 833-1458 
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and  an  EPROM  emulator.  With  such  a  hudget 
development  system,  you  can  bring  up  a  controller 
based  on  ANY  processor  which  can  use  EPROM. 
Of  course,  it's  even  easier  if  you  have  an  assembler 
on  your  system  for  the  processor  you  are  using  in 
the  controller. 

Perhaps  you  would  like  to  control  your  electric 
train,  or  build  a  home  environment  control  system. 
Or  maybe  you  want  to  computerize  your  wife's 
loom.  Maybe  you'd  like  to  cash  in  on  your  software 
experience  and  build  custom  controllers  for  local 
industrial  clients.  Whatever  your  bag,  you  probably 
already  have  with  your  present  personal  computer, 
most  of  what  you  need  to  put  together  a  very 
practical  microprocessor  development  system.  Stay 
tuned  for  the  next  exciting  installment.  q 
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6502  FORTH 

6502  FORTH  is  a  complete  programming  system 

which  contains  an  interpreter/compiler  as  well 

as  an  assembler  and  editor. 
6502  FORTH  runs  on  a  KIM-l  with  a  serial  terminal. 

(Terminal  should  be  at  least  64  chr,  wide) 
All  terminal  I/O  is  funnelled  through  a  jump  table  near 

the  beginning  of  the  software  and  can  easily  be 

changed  to  jump  to  user  written  l.'O  drivers. 
6502  FORTH  uses  cassette  for  the  system  mass 

storage  device 
Cassette  read/write  routines  are  built  in  {includes 

Hypertape). 
92  op-words  are  built  into  the  standard  vocabulary. 
Excellent  machine  language  interface. 
6502  FORTH  as  user  extensible. 
6502  FORTH  is  a  true  implementation   )f  forth 

according   to  the  criteria  set  down  by  the  forth 

interest  group. 
Specialized  vocabularies  can  be  developed  for  specific 

applications. 
6502  FORTH  resides  in  8K  of  RAM  staling  at  $2000 

and  can  operate  with  as  little  as  4K  of  additional 

contiguous  RAM. 


6502  FORTH  PRICE  LIST 

KIM  CASSETTE,  USER  MANUAL,  AND 
COMPLETE  ANNOTATED  SOURCE 
LISTING  $90.00 

{$2000  VERSION)       PLUS  S&H     4.00 

USER  MANUAL  (CREDITABLE 
TOWARDS  SOFTWARE 
PURCHASE)  $15.00 

PLUS  S&H     1.50 

SEND  A  S.A.S.E.  FOR  A  FORTH 
BIBLIOGRAPHY  AND  A  COM- 
PLETE LIST  OF  6502  SOFTWARE, 
EPROM  FIRMWARE  (FOR  KIM, 
SUPERKIM,  AIM,  SYM,  and 
APPLE)  AND  6502  DESIGN 
CONSULTING  SERVICES 
AVAILABLE 

Eric  Rehnke 

1067  Jadestonc  Lane 

Corona,  CA  91720 


Now  Available  For 
KIM,  AIM,  And  SYM 
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A  Kim-I  Music 
File  in 
IViicrosoft 
Basic 


Parti. 


Anthony!  Scarpelli 
N.Windham  ME 

Getting  The  System  Together 

If  you  have  a  KIM-I,  don't  have  a  printer,  but  do 
have  a  memory  mapped  video  display,  here's  how  I 
solved  the  problem  of  getting  a  software  routine  to 
cause  an  ASCII  keyboard  to  act  like  a  serial  tele- 
printer with  all  the  KIM-I's  teletype  operations. 
There's  nothing  that  seems  complicated  about 
what  I  did,  but  it  sure  took  some  mental  gyrations 
to  get  it  working.  Yet  I  did  learn  a  lot  about  the 
KIM  monitor  routines  which  I'll  tell  you  about. 
Also  how  to  implement  BASIC,  and  how  to  imple- 
ment a  Music  File  which  I  wrote  for  my  wife. 
Here's  the  story. 

I  had  a  KIM-I  up  and  running  and  was  learning 
a  lot  about  assembly  language  programming,  when 
the  opportunity  of  getting  a  high  resolution  video 
monitor  for  cheap  came  along.  I  bought  a  SWTP 
keyboard,  and  while  I  was  at  one  of  the  computer 
fairs  last  year  I  purchased  Microtechnology's  8K 
visible  memory  and  a  main  frame.  The  price  was 
good  and  it  was  completely  compatible  with  the 
KIM.  It's  a  dynamic  memory  system,  but  is  com- 
pletely invisible  to  normal  computer  use,  and  it  has 
a  standard  video  output.  It  works  beautifully,  and 
is  fairly  high  in  resolution  with  64,000  bits  as  dots 
on  the  screen.  Writing  a  "I"  in  a  memory  location 
lights  up  a  dot,  and,  of  course,  a  "0"  turns  the  dot 
off.  Microtechnology's  SWIRL  software  routine 
shows  the  system  off  and  provides  hours  of  viewing 
enjoyment;  and  when  company  comes  over  it's 
great  for  showing  off  your  computer. 

Microlechnology  also  has  a  text  display  routine 
whereby,  after  an  ASCII  number  is  put  into  the 
accumulator,  a  subroutine  call  to  the  text  display 
puts  the  ASCII  character  on  the  monitor  screen.  It 
provides  a  53  character  by  18  line  display,  with 
both  upper  and  lower  case  letters.  Having  a  software 
character  generator  gives  you  complete  control 
over  the  configuration  of  the  letters.  For  instance, 
I  changed  all  my  lower  case  letters,  which  I  didn't 
need,  into  a  table  of  26  lines,  dots,  and  other 
shapes  for  drawing  on  the  screen.  Also,  the  whole 
screen  can  be  saved  on  tape.  My  wife  was  very 
pleased  as  a  valentine  mes-sage  formed  from  a 


randomly  patterned  screen.  Hypertape  loaded  the 
screen  in  under  three  minutes. 

I  also  purchased  from  Microtechnology  their 
bare  board  16K  memory,  and  purchased  the  I.C.'s 
and  components  at  other  sources.  You  can  save 
about  a  hundred  dollars  this  way,  but  you  do  have 
to  get  a  few  extra  memory  chips  in  case  a  bad  one 
comes  up  and  you  do  have  to  do  all  of  your  own 
soldering,  and  testing.  If  you  go  this  route  you 
might  have  a  fault  in  the  bare  board.  In  the  one  I 
bought,  a  part  of  the  PCB  pattern  wasn't  etched 
away  so  I  had  no  -5v  supply.  After  I  fixed  the 
problem  the  board  worked  perfectly  the  first  time 
running  and  onwards,  and  I  have  nothing  but 
praises  for  the  design. 

Then  came  the  job  of  getting  my  keyboard 
with  parallel  output  ASCII  to  go  serial.  It  turned 
out  to  be  not  too  difficult  when  I  found  an  interface 
in  a  series  of  articles  by  John  Blankenship  in 
Kilobaud.  In  the  March  '78  issue  he  shows  how  to 
build  a  parallel  to  serial  interface  for  the  KIM-I.  It 
merely  takes  the  parallel  output  of  the  keyboard, 
using  three  I.C.'s  and  a  transistor,  and  the  Kim's 
power  and  clock,  and  converts  it  to  a  serial  output 
which  is  presented  to  the  printer  input  of  the  KIM. 
It  worked  very  well. 

Then  what?  Well,  here  comes  the  hard  part. 
In  order  to  get  the  KIM  to  accept  a  printer  input, 
you  connected  pins  "2 1 "  and  "V"  on  the  applications 
connector,  hit  the  RS  button,  press  the  RUBOUT 
key  on  your  keyboard  and  type  away.  The  only 
problem  is  that  any  ASCII  characters  that  come  in 
don't  go  anywhere  except  to  the  printer  output  of 
the  same  connector.  The  ASCII  number  is  put  into 
the  accumulator,  but  how  do  you  call  up  a  subrou- 
tine in  some  other  part  of  memory  to  display  it? 
The  solution  wasn't  too  difficult.  You  write  a  little 
program  that  jumps  to  KIM's  own  GETCH  sub- 
routine which  then  puts  the  printer  ASCII  charac- 
ter into  the  accumulator,  then  jumps  to  the  charac- 
ter display  subroutine,  then  jumps  back  to  the 
GETCH  etc.  You  start  out  by  going  to  the  memory 
location  where  the  program  starts  on  the  KIM 
keyboard,  short  the  two  pins  together  (best  to  get  a 
switch  to  do  this),  hit  RS,  then  RUBOUT,  and  G 
on  the  keyboard,  and  away  you  go.  You're  finally 
writing  on  the  CRT.  Now  what? 

With  this  method  that's  about  all  you  can  do 
because  you  are  in  a  program  of  your  own  creation 
and  are  using  KIM's  ROM  routines,  and  you  have 
to  stay  there  until  you  hit  ST  (stop).  What  I  really 
wanted  to  do  was  have  my  keyboard  act  just  like  a 
printer:  change  memory,  display  it,  and  all  the 
other  things  the  user  manual  said  you  can  do  with 
a  printer.  I  asked  myself,  how  easily  can  this  be 
done?  More  likely,  how  difficult  is  it.  There  were 
two  possibilities  open  to  me:  hardware  or  software. 
My  old  teacher  said  you  never  learn  enough  by 
going  the  easy  route.  I  didn't  know-whether  hard- 
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ware  or  software  was  the  most  difficult,  but  I  chose 
software.  You  can  judge  the  result;  I  probably 
would  have  bought  a  printer. 

To  go  the  software  route  meant  rewriting 
some  of  the  subroutines  in  the  KIM's  ROM.  To 
show  you  what  routines  I  had  to  include,  let's  go 
over  what  happens  in  the  KIM  when  you  hit  RS.  So 
get  out  your  user  manual,  follow  the  diagrams  and 
let's  go. 

First  look  at  the  Hstings  starting  at  IC22  in  the 
User  Manual  and  also  at  fig.  1 . 

1.  When  the  RS  (reset)  button  is  pressed  the  data  at 
locations  IFFC  &  IFFD,  which  happens  to  be  the 
address  1C22,  is  put  into  the  program  counter. 
This  is  the  entry  point  for  the  program  in  ROM  of 
the  6530-002.  This  address  is  fixed  and  cannot  be 
changed.  It  is  the  KIM  entry  via  RST, 

2.  The  first  thing  that  happens  is  the  stack  pointer 
is  initialized  to  FF. 

3.  Then  we  go  to  a  subroutine  called  INITS  at 
1E88.  In  INITS,  the  first  thing  done  is  to  put  01 
into  the  X  register  and  then  put  it  into  the  top  of 
the  stack  at  OOFF. 

Next,  the  X-index  gets  00  and  is  stored  in 
PADD  which  is  the  6530-002  A  ports  data  direction 
register.  This  is  at  address  1741  and  makes  all  the 
ports  inputs  so  they  can  accept  data  from  TTY  or 
KB  (keyboard). 

Next  X-index  gets  3F  and  is  stored  at  1743 
which  is  the  6530-002  B  ports  data  direction 
register,  PBDD,  and  it  makes  ports  PB6  and  PB7 
inputs,  and  all  the  rest  outputs.  PB7  is  connected  to 
the  audio  tape  interface  circuits  and  is  prepared  to 
accept  program  loading  from  tape. 

Next  X-index  is  loaded  with  07  and  is  stored  in 
SBD  ( 1 742)  which  is  the  data  to  be  sent  out  from 
the  6530-002  data  ports.  So  PB  0,  1 ,  &  2  now  have 
I's  on  them.  PBO  is  for  TTY  data  out.  PB  1,  2,  3,  & 
4  go  to  the  74145  I.C.'s  inputs.  With  a  1  on  I  &  2 
and  0  on  3  &  4,  all  the  outputs  of  the  74 145  are 
high  except  03.  This  goes  out  to  application  con- 
nections A-V.  When  this  pin  is  connected  to  A-21 
(PAO),  PAO  becomes  low.  This  indicates  TTY 
mode. 

Next  decimal  mode  is  cleared  and  the  interrupt 
disable  status  is  set.  Then  a  return  from  this  sub- 
routine. 

4.  Next  back  at  1C2A,  FF  is  stored  at  17F3  (CNTH 
30)  which  is  the  TTY  count,  and  01  is  stored  in  the 
accumulator.  Then  SAD  ( 1 740)  is  tested,  specifically 
PAO.  If  it  is  not  equal  to  zero,  that  is,  if  it's  high,  the 
program  branches  to  START.  PA7  is  tested  also. 
This  is  the  input  from  the  TTY  keyboard.  It  tests 
for  a  rubout  bit.  PA7  is  normally  a  one  and  the 
program  will  keep  on  testing  this  input  until  a  zero 
is  detected  and  also  PAO  in  case  the  TTY  mode  is 
not  wanted  any  more. 

If  a  zero  is  detected,  the  accumulator  is  loaded 
with  FC  and  the  carry  fiag  is  cleared,  then  01  is 
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f 

added  to  the  accumulator  (FC).  If  the  carry  flag  is 
not  set  it  will  branch  to  DET  2.  It  will  the  first  time 
around  anyway.  This  part  (DET  2)  first  loads  Y- 
index  with  SAD  ( 1 740)  and  if  the  rubout  bit  is  still 
there  (a  0  at  PA7)  then  it  goes  back  to  DET  3  and 
another  01  is  added  to  the  accumulalor.  When  the 
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ALLAMUCHY,  N.J.  07820 

201-362-6574 


HUDSON  DIGITAL  ELECTRONICS  INC. 


ANNOUNCING  thehdeomnidiskgs/s 


Now,  you  can  "plug  in"  the  latest  in  a  success- 
ful series  of  flexible  disk  systems  developed  by 
HDEfortheKIM.SYM  and  AIM  microcomputers. 
Tfie  OMNIDISK  65/8  is  a  complete  system, 
using  8  inch  soft  sectored  diskettes  with  a 
formatted  (IBM  Standard)  capacity  of  256K.Of 
course,  a  disk  formatting  function  is  included 
as  are  system  supporting  utilities  for  file 
renaming,  disk  packing,  copy  (dual  systems) 
and  others. 

TED,  a  full  featured,  line  oriented  editor  is 
standard  in  KIM  and  SYM  based  versions  to 
get  you  up  and  running  on  your  project  in  a 
hurry.  The  AIM  version  uses  the  on-board 
editor.  With  the  OMNIDISK  65/8  you  can  con- 


centrate on  your  problem,  the  disk  supports 
you  all  the  way. 

OMNIDISK  65/8  is  available  in  an  attractive 
walnut  wood  cabinet,  or  unpackaged  for  OEM 
applications  in  dual  and  single  drive  configura- 
tions. The  HDE  disk  controller  is  a  state-of-the- 
art  472"  by  6V2"  card  electronically  compatible 
with  the  44-pin  KIM-4  bus  structure.  The  con- 
troller and  disk-driver  are  designed  to  operate 
with  the  popular  Shugart  801  -R  and  compatible 
devices. 

The  OEM  single  drive  is  $1 1 95,  the  dual,  $1 895 
and  the  dual  in  the  walnut  cabinet,  S2200. 
Price  is  another  reason  to  step  up  to  the  proven 
quality  of  an  HDE  system. 
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accumulator  reaches  FF  and  01  is  added,  the  carry 
flag  is  set  and  CNTH30  (17F3)  is  incremented,  it 
becomes  00.  As  long  as  the  rubout  bit  is  there  the 
accumulator  keeps  on  increasing  and  increases 
CNTH30.  As  soon  as  the  bit  ends  the  accumulator 
is  stored  in  CNTL30  (i7F2)  and  X-index  gets  an 
08.  Then  the  program  goes  to  subroutine  GET5  at 
1E6A,  where  it  goes  to  DEHALF  (lEEB). 

5.  DEHALF  first  gets  the  high  byte  count  time  at 
CNTH30  and  stores  it  in  TIMH  ( 1 7F4),  then  gets 
CNTL30.  The  accumulator  and  TIMH  are  shifted 
right  (divides  by  two).  If  the  0  bit  had  a  0  the  carry 
flag  is  cleared  and  a  branch  is  taken  to  DE2,  other- 
wise the  accumulator  is  OR'd  with  80  and  it  branches 
to  DE4.  If  the  DE2  branch  was  taken  the  carry  flag 
has  been  set  and  next  0 1  is  subtracted  from  the 
accumulator.  The  time  is  reduced  and  back  with 
RTS.  What  is  happening  here  is  the  keyboard  baud 
rate  in  CNTL30  and  CNTH30  is  halved  to  get  in 
the  middle  of  the  bit,  then  delayed  one  whole  bit  to 
read  the  next  bit  of  the  character.  Cute,  huh. 

6.  Back  at  1E6D  (GET2),  the  accumulator  is  loaded 
with  SAD  and  the  bit  number  7  only  is  saved.  OOFE 
is  shifted  right,  then  OR'd  with  the  accumulator 
and  stored  in  OOFE.  Another  delay  and  the  process 
is  repeated  until  the  whole  character  is  retreived, 
then  another  half  delay,  X-index  is  loaded  with 
TMPX  (OOFD),  and  the  accumulator  gets  CHAR 
which  is  the  ASCII  character.  The  accumulator  is 
rotated  left  then  shifted  right,  which  gets  rid  of  any 
parity  bit  that  might  be  stuck  on  the  character. 
Then  a  return  to  START. 

7.  START.  First  is  a  jump  to  subroutine  INITl 
(1E8C)  which  is  the  same  as  before,  it  sets  up  the 
ports.  The  accumulator  is  loaded  with  01,  and  SAD 
is  tested  again  for  TTY  or  KB  mode.  If  there's  a  1 
in  PAO  it  branches  to  KB  mode.  If  no  KB  mode,  it 
then  jumps  to  CRLF,  Fig.  2  &  3,  (1E2F),  which 
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Figure  2.  CRLF  Subroutine 


Figure  3.  OUTCH  Subroutine 

prints  a  carriage  return,  then  a  line  feed,  then  JSR 
PRTST  prints  "KIM",  then  jumps  to  SHOWl 
(IDAF),  Fig.  4,  and  then  back  to  CLEAR,  Fig.  7. 

8.  CLEAR.  The  accumulator  gets  loaded  with  00 
and  is  stored  in  INL  &  INH.  The  program  tests  for 
a  character  in  GETCH,  Fig.  8.  In  GETCH  it  stays 
in  a  loop  waiting  for  a  start  bit.  After  the  start  bit, 
the  rest  of  the  character  is  retreived  and  loaded 
into  the  accumulator,  the  program  then  comes 
back,  and  we  test  for  KB  mode  again.  If  no  KB  the 
character  is  changed  into  a  hex  number  in  PACK, 
Fig.  9,  and  then  in  SCAN,  Fig.  10,  the  program 
determines  if  the  hex  number  is  an  execute  key.  If 
not,  it  will  get  another  character. 
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*To  be  modified 
re  4.  SHOWl  Routine 

So  this  is  the  program  I  need  to  simulate  a 
teletype.  The  problem  now  becomes,  what  are  the 
subroutines  I  have  to  rewrite  and  which  ones  of  the 
KIM's  ROM  subroutines  can  I  use.  Obviously,  any 
part  of  the  program  that  refers  to  a  ROM  address 
has  to  be  rewritten,  such  as  in  a  JMP.  Also  when 
the  accumulator  gets  the  ASCII  character  that  is  to 
be  displayed,  the  program  that  does  the  displaying, 
in  this  case  called  DTEXT  (the  Microtechnology 
software  routine),  has  to  be  addressed  at  the  right 
point,  and  thus  any  subroutines  involved  here  have 
to  be  rewritten.  So  definitely  the  subroutine 
OUTCH  has  to  be  changed  to  add  DTEXT.  We 
get  to  OUTCH  from  CRLF  so  that  has  to  be  rew- 
ritten. CRLF  is  addressed  from  START  which  is 
part  of  the  whole  RST  routine.  As  you  can  see  it 
starts  to  get  involved.  So  if  you  go  this  route  table  I 
lists  all  the  KIM  ROM  routines  that  must  be  rewrit- 
ten. Of  course  in  this  rewriting,  some  branches 
have  to  be  changed  as  well  as  addresses.  (A  SASE 
sent  to  me  will  get  you  a  list  of  the  changed  ad- 
dresses.) 

Now  my  keyboard  acts  just  as  a  teletype,  and  I 
can  display  all  the  teletype  outputs  from  the  KIM 
on  the  CRT.  First  I  go  to  the  RST  program  address, 
the  one  I  rewrote,  on  the  KIM  display,  switch  to 
teletype  mode,  hit  RS  on  the  KIM,  then  press  the 
rubout  key  on  the  keyboard.  The  SWTP  keyboard 
doesn't  have  an  actual  rubout  key,  but  there  are 
two  spare  keys,  one  of  which  can  be  wired  as 
rubout.  Then  I  press  the  G  key  which  puts  me  into 


SEA  WELL  PROMMER  II  - 
There's  Nothing  Like  It! 


Tmrm 

'  Two  Independent  blocks  of  4  EPROM  sockets 

■  KIM,  SYM  or  AIM  progrdmming  firmware 

■  Programs  1,  2  or  4K  5- Volt  EPROMS:  TMS2S08,  2SI6,  2532  and 
2753,  2716,  2732 

■  Read-Only'DeselectedyHead-Program  for  each  socket 
'  Program -protect  toggle  switch  for  whole  board 

■  Provision  for  remoting  4  sockets 

'  On-board  generation  of  programming  voflage. 

The  Seawell  PROMMER  II  is  a  general  purpose  EPROM  tool 
designed  for  use  in  a  development/production  environment.  Con- 
nects to  a  KIM,  SYM  or  AIM  with  a  Seawell  LITTLE  BUFFERED 
MOTHER  motherboard,  or  to  a  SEA-1  single-board  computer. 
The  PROMMER  11  is  all  you  need  to  read,  program  and  execute 
1,  2or  4K  5- Volt  EPROMs. 


The  PROMMER  II  allows  you  to  put  as  little  as  IK  or  as  much 
as  32K  ot  EPROM  on  the  bus.  You  never  have  to  give  up  address 
space  to  empty  sockets.  Each  socket  can  be  enabled  to  READ  on- 
ly, READ  and  PROGRAM,  or  can  be  DESELECTED  entirely. 
Simply  moving  a  shunt  sets  one  block  of  A  sockets  to  1,  2,  or  4K. 
The  other  block  can  be  set  independently. 

Addresses  are  selected  by  piano-type  switches  on  the  top 
edge  of  the  board.  The  whole  board  can  be  program-protected 
by  a  toggle  switch  on  the  top  right  corner  of  the  board.  A 
separate  one-page  ROM  containing  relocatable  firmware  for  KIM, 
SYM  or  AfM  is  provided  which  can  be  set  to  any  page  in  memory 
in  either  of  two  banks  or  deselected  entirely.  A  satellite  board 
with  four  sockets  and  program-protect  switch  will  be  available 
soon. 
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SEAPROMMEH II EPROM  PROGRAMMER  $299 
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DUALPOflTBAM 1595 
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the  RST  program,  (rewritten).  When  the  rubout 
key  is  pressed  again  the  CRT  will  display  "KIM" 
and  also  the  address  of  the  RST  program;  now  we 
are  as  a  teletype  with  all  its  functions.  Simple, 
wasn't  it. 

Next  time  I'll  go  into  the  actual  file  program 
that  creates  a  music  file,  and  then  can  search  it  for 
any  of  a  number  of  subjects. 
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TEST  FOR 
DUMPVQ(51) 
See  Fig.  18 


TEST  FOR 
LOAD  V  L(4C) 
See  Fig.  19 


JMP  READ 
1C6A 


Figure  10. 
SCAN  Routine 


DUMPV 

lECI 


jJt 


JMP  DUMP 
1D42 


SHOW 


SHOWl 


ETC. 


Figure  1 1.  SPACE  Routine 


STV 
IDFE 
Rub  Out. 


JMP  START 


Figure  12.  STV  Routine 


Figure  13.  RTRN  Routine 


mp  from  open 
III  limit.  Prints 


Dump 

to  hi 

out  memory. 


cell 


Figure  18.  Dump 
"V"  Routine 


JSR  OPEN 
I  FCC 


JSR  CRLF 

1E2F 


JSR  PRTPNT 
lElE 


•To  be  modified. 


LOADV 

1E04 

Load  paper  tape. 


Figure  19.  Load  "V" 
Routine 


JUMP  LOAD 
ICE7 


RTRN 

1DC2 

Open  next  cell. 

\ 

JSR INC AT 
1F63 

} 

f 

\ 

JMP  SHOW 

FEED 
1E07 
Previous  cell. 


DEC  POINTL 
&  POINTH 


JMP  SHOW 


Figure  14.  FEED 
Routine 


MODIFY 
1£15 
Modif)'  Cell. 


LDYOO 


LDA INL 


STA(POINTL),Y 


JMP  RTRN 
1DC2 


Figure  16.  MODIFY 
Routine 


RUN  PROGRAM 
FROM  POINTH  &  L 
WHICH  IS  PUT 
ONTO  STACK 


_>iL 


RTI 


J 


Figure  1 7.  GOEXEC 
Routine 
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f  START  J 


SETUP 

ENTRY  STRING 
SPACE 


SETUP 

FOR 

PROMPT 


INPUT 
PROMPT 


NO 


PRINT 

ENTIRE 

ENTRY 


NO 


NE  =  NI 


DUMP 
ROUTINE 


END  ENTRY 
PROMPT 


NO 


END 


Figure  20. 

Make  Entry  Routine 


Assembly  Language  Program  for  Cassette  DUMP  &  LOAD 
0300   A5  01  DELAY      LDA  DELTIM   Loail  delay 


02   85 

EE 

STA 

TIMEA 

value. 

04   A9  30 

DECB 

LDA  30 

Load 

06   8D  04 

17 

STA 

1704 

timer. 

09   2C  07 

17 

TEST 

BIT 

1707 

Test  timer. 

OC  10 

FB 

BPL 

TEST 

Branrh  if  not  run  out 

OE  C6 

ED 

DEC  TIMEB 

Red  Lice  time  value. 

10    DO  F2 

BNE  DELB 

Star  again. 

12   C6  EE 

DEC  TIMEA 

Red  Lice  delay  value. 

14   DO  EE 

BNE  DELA 

Branch  if  not  done. 

16   60 

RTS 

Relvirn. 

0317   A9  02 

TWRITE 

LDA  #02 

Tuni  tapeon. 

19    10 

02 

BPL 

TAPE 

IB  A9  01 

TREAD 

LDA  #01 

Tuni  tape  off. 

ID  4D  03 

17 

TAPE 

EOR 

1703 

20    8D  03 

17 

STA 

1703 

23   60 

RTS 

Return. 

0324   20 

17 

03 

WRITE 

JSR 

TWRITE 

Turn  tape  on. 

27    20 

00 

03 

JSR 

DELAY 

DeU)  for  tape  speed. 

2A  20 

00 

02 

JSR 

HYPER 

Reci>rd  in  hypertape. 

2D  20 

17 

03 

JSR 

TWRITE 

Turn  tape  off. 

30    20 

8C 

IE 

JSR 

INITI 

Open  ports  again. 

33   60 

RTS 

Retiim. 

03D5  20 

IB 

03 

READ 

JSR 

TREAD 

Turn  on  tape. 

D8  20 

36 

03 

JSR 

LOADT 

Load  tape. 

DB20 

IB 

03 

JSR 

TREAD 

Turn  off  tape. 

DE20 

8C 

IE 

JSR 

INITI 

Open  ports  again. 

El  60 

RTS 

Return. 

Note:   HYPER  is  taken  from  The  First  Book  of  KIM 

page  1 19  relocated  to  address  0200. 

LOAD  r  is  taken  from  ilie  KIM-I  LIsei'  Manual  Program 

listing  page  6  relocated  from  address  18  / 1-1931  to 

0334-0304. 

I  f  you  wish  to  use  the  same  routines  in  the  .same  addresses 
as  I  did,  send  a  SASE  and  I'll  let  you  know  what  locations 
have  to  be  changed  iiT  tliose  listings  to  get  it  to  run  right.  ^ 


DISK  DRIVE  WOES?  r     "V 

PRINTER  INTERACTION? 
MEMORY  LOSS? 
ERRATIC  OPERATION? 

Don't  -  ^ 

Blame  The 
Software! 

Powsr  Line  Spikes.  Surges  8. 

Hash  could  be  the  culprit! 

Floppies,  printers,  memory  &  processor  often  internci!  Our  unique 

ISOLATORS  eliminate  equipment  interaction  ANC  curb  damaging 

Power  Line  Spikes,  Surges  and  Hash. 

•  ISOLATOR  (ISO-1)  3  filter  Isolated  3prong  socktis:  Integral 
Surge/Spike  Suppression;  1875  W  Maximum  load.  1  KW  load  any 
socket S62.95 

•  ISOLATOR  (ISO-2)  2  filter  Isolated  3-prong  socktit  banks;  (6 
sockets  total);  Integral  Spike/Surge  Suppression;  1875  W  Max 
load,  1  KW  either  bank S62.95 

•  SUPER  ISOLATOR  (ISO-SK  similar  lo  ISO-1  Bxcojt  double 
interlng  &  Suppression S94.95 

•  ISOLATOH  (ISO-4),  similar  to  ISO-1  except  unit  has  6 
Individually  filtered  sockets $106.95 

•  ISOLATOR  {ISO-5),  similar  to  1S02  except  unit  has  3  socket 
banks,  9  sockets  total $87  95 

•  CIRCUIT  BREAKER,  any  model  (add-CB) Add  S  8.00 

•  CKT  BRKR/SWITCH/PILOT  (-CBS) Add  S16.00 

Master. Charqo,  Vis<i.  Amencan  Express 

Order  TdII  Free  1-800225.4376 

lescGpt  AK.  HI,  MA,  PR  s  Canadal 


JS^ Electronic  Specialims,  Inc. 

m  South  Main  SUeet  Natiek.  Mass.  OIKO 
TeiJhnical  &  Non-800:  1-617-655-1532 
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CAPUTS! 

Corrections/Clarifications 


From  Raymond  Diedrichs  ("Pet  File  I/O  In  Machine 
Language",  April,  1981,  Issue  11,  pp.  144-145): 

"In  the  machine  language  open  statement,  the 
following  lines  are  missing: 

LDA  #DEVICE-NLIMBER 

STA  $D4 

LDA  #SECONDARY-ADDRESS 

STA  $D3. 


They  should  appear  directly  below  the  line 
which  reads: 
STA  $D2. 


Computer  House  Division 


PROGRAMS  FOR  COMMODORE 

Legal  accounting  Demo 

Legal  accounting  Program 

Machine  Part  Quote  Demo 

Machine  Part  Quote  Program 

Mailing/phone  list 

Political  Mail/phone  list 

Beams,  structural 

Trig/Circle  Tangent 

Spur  Gears 

Bolt  Circles 

Filament  Wound  TAnks 

Scrunch 


AND  APPLE 
$15.00 

995.00 

15.00 

325.00 

80.00 

130.00 

115.00 

110.00 

35.00 

25.00 

125.00 

25.00 


PROGRAMS  FOR  COMMODORE  ONLY 

A/P,  A/R,  Job  Cost  &  Job  Est.  370.00 

Inventory  95,00 

Financial  175.00 

Real  Estate  Listings  265.00 

Check  Writer  25.00 

File  Editing  Tools  (FET)  65.00 

Screen  Dump/Repeat  35.00 

Docu-Print  20.00 

Scrunch                                               <  25.00 

Sof-Bkup  40.00 

Sorter  (Mach.  Language)  35.00 

Trace-Print  25.00 

Vari-Prin)  25.00 


ASK  FOR  CATALOG  #80-02  Dealers  Wanted 
Computer   House   Div.     1407   Clinton    Road 

Jackson,  Michigan     49202       (517)782-2132 


And  here's  the  missing  listing  from  Charles 
Brannon's  "String  Arrays  in  Atari  BASIC," 
April,  1981,  Issue  11,  p.  103. 

100    REM   SIMPLE   BAR   GRAPH    PROGRAM 

110    GRAPHICS    0 

120    PRINT    "NUMBER   OF    COMPANIES"; 

130    INPUT   NO 

140  MAXLEN=20:DIM  A$ (MAXLEN*NC) ,L (NC) , 

-.A(NC)  ,T$CMAXLEN) 
150  FOR  1=1  TO  NC 
160  !$="  ":REM  20  1 

-.SPACES 
170  E=I:GOSUB  20000 

180  PRINT  "ENTER  THE  NAME  OF  COMPANY  " ; I 
190  INPUT  T$:GOSUB  20000 
200  PRINT  "AMOUNT  FOR  ";T$; 
210  INPUT  A:A(I)=A:IF  A>HI  THEN  HI=A 
220  PRINT;NEXT  I 
230  GRAPHICS  0 
240  FOR  1=1  TO  NC 
250  E=I:GOSUB  30000 
260  PRINT:PRINT  T? 
270  FOR  J=l  TO  (A(I)/HI)*30 
280  PRINT  CHR$(160) ; 
290  NEXT  J 
300  NEXT  I 
310  END 
20000  L=LEN(T$):IF  L>MAXLEN  THEN  -n 

-iL=MAXLEN 
20010  L{E)=L:START=(E-1)*MAXLENH-1 
20020  A$  (  START,  START-^L-l )  =T$  :RETURN 
30000  START=(E-1)*MAXLEN-H 
30010  T$=A$  (START, START-l-L(E)-l)  :RETURN 
READY. 

Program  Listings  for  COMPUTE 

Cursor  control  characters  will  appear  in  source  listings 
as  shown  below: 

h=HOME  ,  fi=CLEAR    SCREEN 

^=DOWN    CURSOR    ,  T=UP    CURSOR 

>=RIGHT    CURSOR,  <=LEFT    CURSOR 

j:=REVERSE  ,  r=REVERSE    OFF 

Graphics  (i.e.  shifted)  characters  will  appear  as  ihc 
unshifted  atphanumeric  character  with  an  underline. 
This  does  not  apply  to  the  cursor  control  characters. 
The  Spin  writer  thimble  doesn't  have  a  backarrow 
symbol,  so  a  "•""  is  used  instead. 

The  "~i"  is  used  to  indicate  the  beginning  of  a 
continuation  line.  It  is  also  used  to  indicate  the  end 
of  a  line  which  ends  with  a  space.  This  prevents  any 
spaces  from  being  hidden. 
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CARVERY 


The  Carve ry 

156  Front  Street  West 

Toronto,  Ontario  M5J  2L6 

Teleptione  977-7770 

New  Toronto 
Restaurant 

Why  does  a  computer  pour  the 
drinks  at  the  Carvery,  a  downtown 
Toronto  restaurant?  Jim  Butter- 
field,  who  is  a  small  shareholder 
in  the  establishment,  has  no 
comment.  Neither  does  he  explain 
why  the  machine  always  pours 
him  doubles. 

Atari  Launches 
Major  Software 
Acquisition 
Program 

Sunnyvale,  California  —  April  3, 
1981  —  A  major  new  effort  to 
expand  the  library  of  consumer- 
oriented  software  for  its  personal 
computer  systems  is  being 
launched  by  Atari,  Inc.  Atari  is 
looking  for  high  quality  pro- 
grams that  can  be  used  imme- 
diately, and  easily,  by  people  with 
little  or  no  training  in  the  use  of 
computers. 

"We  want  to  acquire  software 
in  the  areas  of  personal  finance, 
self-improvement,  education  and 
home  entertainment.  We  are 
encouraging  the  creation  and 


marketing  of  software  by  vendors 
and  developers,  and  want  to  help 
market  appropriate  materials 
from  outside  authors,"  Bruce  W. 
Irvine,  vice  president  of  software 
for  Atari's  Computer  Division 
said.  "To  start  things  off,  we  are 
sponsoring  a  $100,000  contest  for 
software  authors." 

The  acquisition  program 
involves  the  creation  of  Atari 
Software  Acquisition  Program 
regional  centers  where  qualified 
developers  can  work  with  Atari 
equipment  and  receive  technical 
assistance,  and  Atari  Program 
Exchange,  a  free  quarterly  catalog 
of  user-written  software  to  be 
distributed  to  Atari  computer 
owners.  In  addition,  Atari  will 
offer  periodic  technical  seminars 
for  qualified  software  authors  to 
familiarize  them  with  the  inner 
workings  of  Atari  computer 
products  and  enable  them  to 
write  programs  that  take  advan- 
tage of  all  the  advanced  features 
of  the  ATARI  400™  and  800™ 
computers, 

"We  recognize  that  a  broad 
selection  of  readily  available 
software  is  a  critical  key  to  the 
ultimate  consumer  market.  No 
one  company  can  create  the 
amount  of  material  needed  to 
properly  address  the  market,  so 
we  are  going  to  do  our  best  to 
encourage  our  users  and  software 
vendors  to  create  programs 
compatible  with  Atari  computers. 
Often,  a  user  or  developer  is  an 
expert  in  a  field  we  don't  know 
much  about;  with  our  assistance, 
that  person  can  make  his  or  her 
programs  available  to  the  wide 
audience  they  deserve,"  Irvine 
added. 

Acquisition  Centers 

Beginning  with  an  initial  installa- 
tion in  the  Sunnyvale  area  which 
will  open  in  mid-May,  Atari  will 


develop  software  acquisition 
centers  in  geographical  areas 
where  there  are  high  concentra- 
tions of  programmers  and  users, 
such  as  metropolitan  areas  with 
technical  universities.  No  time- 
table has  been  announced  for  the 
opening  of  these  additional 
facilities. 

Qualified  developers  will  be 
able  to  use  the  centers  on  an 
appointment  only  basis.  Design  of 
the  centers  will  help  insure  the 
privacy  of  material  under  devel- 
opment. Each  center  will  be 
equipped  with  Atari  computers 
annd  peripherals,  all  necessary 
reference  materials  and  technical 
manuals.  Center  staff  will  help 
answer  technical  questions  and 
review  and  evaluate  completed 
software. 

Once  a  program  is  completed, 
Atari  may  be  interested  in  mar- 
keting it  under  the  company 
name,  or  accept  it  for  listing  in 
the  Atari  Program  l^xchange 
catalog.  Or,  developers  may  wish 
to  market  the  program  on 
their  own. 


— W^i^    _^ 

--^^ 

Pet  User  Group 
Celebrates  Third 
Birthday 

As  shown  in  the  birthday  cake 
picture  above,  SPHl  NX  cele- 
brated their  third  year  with  a  full 
sized  Pet  cake  (comj^Iete  with 
keyboard  and  message  on  the 
screen)  at  their  meeting  March 
14,  1981  at  the  Lawrence  Hall  of 
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Announcing 


Horn© 


•sffiy^s^^i?^^^^^^^ 


from  the  publishers  of 

COMPUTE! 

The  Journql  Fof  Progressive  Computing 


Small  System  Services,  Inc.  is  pleased  to  announce  publication  of  a 
new  quarterly  magazine  exclusively  for  the  new  VIC®    computer. 

caMPUTlNS!    ^  editorially  and  physically  of  the  same  high  quality  as 
COMPUTE!,  will  premier  with  an  April/May/ June  issue.  Every  issue  \A/ill 
be  full  of  useful  applications  material  and  learning  aids. 

Dur  staff  of  Contributing  Editors  already  includes  some  of  the  best 
authors  in  the  industry:  Jim  Butterfield,  Tory  Esbensen,  Harvey 
Herman,  and  David  Thornburg,  to  name  a  few. 

Horn  a  and  EdudAtlari^l 

COMPUTIMB!  vvjll  teach,  entice,  and  interact  with  readers  to  help  users 
develop  maximum  benefit  from  the  new  VIC®  personal  connputer 
series  from  Commodore. 

rve  your  first  iBsues  now  by  filling  out  the  form  below. 


Addrees  inquirieB  and 
correspondence  to; 

Horrxr  and  EdLJcaclonBl 

COMPUTIINJB! 

P.O.  Box  5406 
Greensboro,  NC  27403 
313-27'5-aB03 

Robert  C  Lock, 
Editor/Publisher 

First  issue  available 
early  June,  19B1. 


COMPUTIMG! 


r 


Trial  Bubscriptiorr. 

Please  send  me  the  first  three  quarcerly  issues 
of  19S1  for  the  inCraduct:ory  price  of  SS.OO. 

Sample  issue. 

Please  send  me  the  first  issue  at  sn 
intiraductory  price  of  SS.OO. 
I  aiready  D\A/n  a 


n 


Name_ 


computer. 

.  I  don't  yeC  own  a  computer  but  want  to 
learn  more  about  them. 
I  expect  Co  buy  a  VIC®  comiputer. 


Address 
City 


-State. 


_Zip_ 


Charge      my:    MC_ 


Visa. 


expires. 


_/_ 


.  Payment  enclosed 

.  Bill  me.  SI  .DO  billing  charge  will  be  added. 


... I  COMPUTE!  I 


■±  t/-.Taer,-.3jS,s  Of  &Tia!i  SystemH  Sea^<:eB.  \ryz   VlC   «  g  reg.si-i^^^d  tr-aderr^ark  of  CammaOare  B^jsiness  r.1actii*^es.  trc- 
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Science,  Berkeley,  California. 

Originally  formed  by  Niel 
Busey  and  Milt  Lee,  SPHINX, 
(Society  For  Pet  Handlers  Infor- 
mation Exchange),  cooperated 
with  Lawrence  Hall  of  Science  in 
putting  out  a  newsletter  which 
contained  basic  information 
about  the  Pet  when  there  was 
little  from  the  manufacturer. 

Although  the  newsletter  has 
been  discontinued,  they  are  still 
active  in  exchanging  programs. 
At  the  sixth  West  Coast  Computer 
Fair,  April  5,  1981,  a  proposal 
was  made  that  librarians  from 
user  groups  across  the  United 


States  trade  programs  on  a  disk 
basis.  To  this  end  SPHINX  would 
like  to  receive  2040  or  4040 
format  disks  from  other  groups 
and  will  return  the  diskette(s) 
with  programs  from  our  library 
(currently  13  diskettes  and 
growing.) 

Other  current  SPHINX 
projects  are  a  nationwide  Pet/CBM 
telephone  network  for  Pet  users 
with  modems.  Some  interest  in 
sponsoring  this  has  been  shown 
by  Commodore.  SPHINX  also 
plans  to  start  a  library  for  the 
VICcolor  computer  because  of 
the  tape  and  software  compatabil- 


ity.  Many  of  their  programs  will 
run  on  a  VIC  with  minor  or  no 
modifications. 

For  further  information, 
please  write  to  SPHINX  C/O  their 
sponsor: 

PC  Computers 

10166  San  Pablo  Ave. 

El  Cerrito,  CA  94530 

Meetings  in  the  Bay  Area  are 
the  only  way  SPHINX  currently 
exchanges  individual  programs 
—  the  second  Thursday  of  the 
month  at  Lawrence  Hall  of 
Science,  Chem.  Lab,  Berkeley, 
CA  at  7:00  p.m. 


New  Low-cost 
80-Column  Dot 
Matrix  Printer 

MICROTEK,  Inc.  has  announced 
a  new  low-cost  (under  $300)  80- 
column  dot  matrix  printer. 
Dubbed  the  "BYTEWRITER-I", 
the  printer  accepts  single  sheet  or 
roll  paper  up  to  8 '/a  inches  wide 
and  prints  at  60  Hnes  per  minute 
using  a  7  X  7  dot  matrix. 

TheBYTEWRITER-1 
interface  is  similar  but  not  identi- 
cal to  a  Centronics  parallel  inter- 
face, and  has  been  designed 
specifically  to  operate  with  the 
Apple  II,  the  Atari  400/800,  and 
all  models  of  the  TRS-80.  Using  a 
print  mechanism  and  logic  board 
designed  and  manufactured  in 
the  U.S.,  the  unit  is  priced  at  $299 
(interface  cable  slightly  extra). 
MICROTEK  is  directing  its 
marketing  efforts  towards  the 
personal  computing  and  hobbyist 
segment*,  of  the  market,  and  will 
sell  the  printer  direct  only.  The 


BYTEWRITER-I  carries  a  90- 
day  limited  warranty.  Delivery  is 
from  stock  to  60  days. 

For  further  information, 
contact  Diane  Barney-Laukat  at 
MICROTEK,  INC.,  9514  Chesa- 
peake Drive.,  San  Diego,  Califor- 
nia 92123.  (7l4)-278-0633. 


High  Performance 
Data 

Comnnunications 
System        

Norcross,  Georgia  —  Hayes 
Microcomputer  Products,  Inc., 
announces  the  Hayes  Stack  Smart- 
modem  high  performance  data 
communications  system  for  small 
computers. 

The  Smartmodem,  an  FCC- 
approved  direct-connect  device,  is 
designed  for  use  with  RS-232C 
compatible  computers  or  terminals 
to  communicate  via  the  telephone 
system  with  other  computers  or 
time  sharing  systems. 

A  unique  feature  is  that  the 
Smartmodem  can  be  program 


controlled  in  any  language  by 
ASCII  character  strings. 

This  intelligent  datacomm 
system  analyzes  and  executes 
commands  and  in  response  sends 
result  codes  which,  at  the  user's 
discretion,  can  be  English  words 
or  decimal  digits.  The  Smartmo- 
dem has  auto  dial  and  auto  answer 
capabilities.  A  special  design 
feature  is  that  all  circuitry  required 
for  auto  dial  and  auto  answer  is 
installed  within  the  Smartmodem. 
This  eliminates  the  need  for  any 
auxiliary  equipment  and  makes 
the  Smartmodem  a  stand-alone 
system. 

The  Hayes  Stack  Smartmo- 
dem can  be  connected  to  any 
telephone  system  in  the  U.S.  since 
dialing  can  be  either  Touch-Tone* 
or  pulse.  Furthermore,  both 
dialing  modes  can  be  combined 
within  a  command  with  pulse 
being  used,  for  example,  to  access 
a  PBX  board  and  Touch-Tone  for 
dialing  an  outside  number  after 
the  second  dial  tone  is  received. 

An  audio  monitor  permits  the 
user  to  follow  the  progress  of  the 
call  and  be  alerted  lo  wrong 
numbers  and  busy  signals.  If  a 
busy  signal  is  encountered,  by 
entering  a  repeat  command,  the 
Smartmodem  will  automatically 
redial  the  number  at  any  time. 

Operation  can  be  in  full  or 
half  duplex  with  a  data  rate  of  0  — 
300  baud.  Power-on  default 
options  are  controlled  by  the 
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DOWIM-TO-EARTH  PRICES  ON 

OUT-OF-THIS-WORLD  PERSONAL 

COMPUTERS  AND  COMPONENTS, 


Look  at  this! 


-V « « •«  \\  %  <■ '•  • ' 

,, » *  * 


Ohio  Scientific 
Superboard  II 


•  It's  the  first  complete  computer 
system  on  a  board. 

•  Superboard  II  uses  the  ultra 
powerful  B502  Microprocessor 

•  BK  Microsoft  BASIC-in-ROM 

•  4K  static  RAM  on  board, 
expandable  to  BK 

•  Full  53-key  keyboard,  with  upper 
and  lower  case.  Plus  user 
expandability. 

•  Video  interface  and  audio 
cassette  interface. 

The  Ohio  Scientific  Superboard  II  at 
S299  —  in  today's  econonny  —  has 
got  to  be  the  best  buy  by  far.  It  will 
entertain  you  with  spectacular 
graphics  made  possible  by  its  ultra 
higfi  resolution  graphics  and  super 
fast  BASIC.  It  will  help  you  in  school 
or  industry,  as  an  ultra  powerful 
scientific  calculator.  Advanced 
scientific  functions  and  a  built-in 
"immediate"  mode  allow  you  to 
solve  complex  problems  without 
programming. 

The  Superboard  II  can  be 
expanded  economically,  for  business 
uses,  or  to  rennotely  control  your 
home  appliances  and  security.  Even 
communicate  with  other  computers. 

Read  what's  been  written 
about  Superboard  II: 

"We  heartily  recommend  Super- 
board  II  for  the  beginner  who  wants 
to  get  into  microcomputers  with  a 
minimum  cost.  A  real  computer 
with  full  expandability." 
—POPULAR  ELECTRONICS,  MARCH  1979 

"The  Superboard  II  is  an  excellent 
choice  for  the  personal  computer 
enthusiast  on  a  budget," 

—BYTE.  MAY  1979 


Look  at  these  easy  hardware  prices: 

BIO  Board  For  use  with  Superboard  II  and  Challenger  1  P. 

BK  static  RAM.  Expandable  to  24K  or  32K  system  total. 

Accepts  up  to  two  mini-floppy  disk  drives.  Requires  -i-  5V 

@4.5  amps.  S   298 

Mini-Floppy  Disk  Drive  Includes  Ohio  Scientific's  PICO  DOS 

software  and  connector  cable.  Compatible  with  610 

expander  board.  Requires  -I-12V  @1.5  amps  and  -h5V  @ 

0.7  amps.  [Power  supply  &  cabinet  not  included.]  299 

630  Board  Contact  us  for  important  details.  SS9 

AC-3P  12"  combination  black  and  white  TV/video  monitor.  159 

4KP  4K  RAM  chip  set.  79 

PS-005  SV  4.5  amp  power  supply  for  Superboard  II.  45 

PS-0Q3  1 2V  power  supply  for  mini-floppies.  45 

RF  Modulator   Battery  powered  UHF  Unit.  35 

CS-900B  Metal  case  for  single  floppy  disk  drive  and  power 

supply.  [While  stock  lasts.]  49 

AC-12P  Wireless  remote  control  system.  Includes  control 
console,  two  lamp  modules  and  two  appliance  modules,  for 
use  with  B30  board.  175 

AC-17P  Home  security  system.  Includes  console,  fire 

detector,  window  protection  devices  and  door  unit  for  use 

with  630  board,  249 

C1P  Sams  CI  P  Service  manual  8 

C4P  Sams  C4P  Service  manual  16 

C3  Sams  Challenger  III  manual  40 

Ohio  Scientific  and  independent  suppliers  offer  hundreds  of  programs  for  the 
Superboard  II,  in  cassette  and  mini-floppy  form. 


Freight  Pol i C ieS  AI  orders  of  S 100  or  more  are 
shipped  ffeight  prepaid-  Orders  of  less  than  SI  CXI  please  add 
S4.U0  CO  cover  shipping  costs.  Ohin  residents  add  5.5%  Sates  Tax. 


S 


Hours.   Cal!  Monday  thnj  Fndav 
a, 00  AM  ta5:DD  PM  EOT, 
TOLL  FREE:  1-600-321-5805 


Guaranteed  Shipment 

CfevelandCoTEjmer  Computers  &  Compofients 
guarantees  shipment  of  computer  systems 
wthin  4B  hours  upon  recejpt  at  your  order- 
Our  failure  to  bHki  within  48  hour* 
Dntitlos  you  to  B35  of  oaftwarSi  FflEE. 


To  Order:  Or  to  gen  our  free  catalog  CALL  1-800-3S1-5805  TOLL  FREE.  Charge  your 

order  to  your  VISA  or  MASTER  CHARGE  account.  Ohio  residents  call:  [21 B]  464-B047. 
Or  write,  including  your  check  or  money  ordEr,  to  the  address  listed  below. 

CLEVELAND  CONSUMER 
COMPUTERS  &  COMPONENTS 

P.O.  Box  46627 
Cleveland,  Ohio  44146 


I 
I 
I 
I 
I 

I 
I 
I 
I 

IOrder-s  of  less  than  SIOO,  please  add  54.00  to  cover  shipping  costs.  Orders  will  be  accepted  fram,U.S-  end  ■ 

Canada  only.  All  prices  quoted  are  U.S.,  date  of  publication,  standarxl  UPS  shipping  FOB  the  factory.  0    " 


nrtrl^n    Cnnrv«B  Cleveland  consumer  P.O.  Box  46627 

^1   UCI       rUI    IIIb  COMPUTERS  fitCOMPOIMENTS  Cleuetand,  Ohio  44146 

I  1  Superboard  II  S299.  D  RF  Modulator  S35. 

n  61 0  Board  5298.  n  AC-3P  1  2 "  B/W  Monitor  $1 59. 

G  Mini-Floppy  Disk  Drive  5299.  D  CI  P  Sams  Manual  $B. 

[Attach  separate  sfieet  for  other  items,] 

NAME  

ADDRESS:    

CITY: 

PHONE:    


.  STATE: 


ZIP: 


Payment  by:  VISA 

Credit  Card  Account  #_ 
Expires 


MASTER  CHARGE . 


MONEY  ORDER . 


.  Interbank  #(Master  Charge] 


TOTAL  CHARGED  OR  ENCLOSED  S. 


.  [Ohio  ResiiJents  add  6.5%  Sales  Tax] 
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WEST  COAST 

flMEGA  Sales  Co. 

3353  Old  Conejo  Rd.  #102 

Newbury  Park,  CA  91320 

1-800-235-3581 

1-805-499-3678 


RADIO  SHACK  16K  Level  II  Model  3 

RADIO  SHACK  64K  Model  2 

ANADEX  DP-9500 

TELEVIDE0  912C 

TELEVIDEO920C 

TELEVIDEO950 

ATARI  825  PRINTER 

ATARI  850  INTERFACE 

ATARI  810  DISK 

(Call  for  price  list  of  ATARI  Software) 


$875 

$3449 

$1249 

$669 

$729 

$1049 

$729 

$169 

$449 


C-ITOF 
STARWRITER2S 


$1595 


EPSON  MX-80  PRINTER 

INTERFACES:  IEEE  $55.  TRS»80  $35. 
APPLE  INTERFACE  +  CABLE  $90 

RS.232J70    Call  for  price 


NEC  MONITOR 
$219 


CALL  TOLL  FREE 


WSM- 


a 


EAST  COAST  /  WEST  COAST 

1-800-556-7586        1-800-235-3581 

MEGA  SALES  COMPANY 


COMPUTE! 
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EAST  COAST 

OMEGA  Sales  Co. 

12  Meeting  St. 

Cumberland,  Rl  02864 

1-800-556-7586 

1-401-722-1027 


SPBCIAL  OF  THE  MOHTH/ 


MNTERTEC  SUPERBRAIN 

64K  RAM  $2849 

\0R  TOGETHER  FOR  ONLY] 
$5195 

NEC  5510  SPINWRITER      $23951 


16K 
ATARI  800 
$759 


DfABLO 

$1995 

Tractor  option  $200 


OKIDATA  MICROLINE-83 

OKIDATA  MICROLINE-80 

APPLE  II  PLUS48K 

APPLE  DISK  w/  3.3  DOS  Controller 

APPLE  DISK  w/o  Controller 

BASE  II  PRINTER 

HAZELTINE1420 

NORTHSTAR  HORIZON  II  32K  QD 

ATARI  400  8K 

ATARI  400  16K 


•  NO  SURCHARGE  FOR  CREDIT  CARDS 

•  WE  ACCEPT  C.O.D.'S 

•  ALL  EQUIPMENT  FACTORY  FRESH 
W/MANUFACTURER'S  WARRANTY 

•  STOCK  SHIPMENTS  USUALLY  SAME  DAY  OR  NEXT  DAY 

•  NO  HIDDEN  CHARGES  - 

WE  LIVE  BY  OUR  PUBLISHED  PRICES 


a 


MEGA  SALES  COMPANY 
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positioning  of  seven  option 
switches.  Four  of  these  options  can 
be  overridden  by  software  com- 
mand. LED  status  indicators  on 
the  front  panel  of  the  unit  provide 
a  visual  check  of  the  Smartmo- 
dem's  operational  status. 

In  addition,  the  unique  "Set" 
commands  allow  the  user  to  select 
(and  change)  various  operational 
parameters  such  as  dialing  speed, 
escape  code  character  and  number 
of  rings  to  answer  on. 

In  announcing  the  release  of 
the  Smartmodem,  Glenn  Sirkis, 
Hayes  Vice  President,  stated,  "The 
Smartmodem,  offers  all  the  classic 


modem  functions  plus  some 
special  features  —  e.g.,  pulse  and 
Touch-Tone  dialing  —  that  are 
available  only  with  a  limited 
number  of  modems.  Add  to  this 
the  features  that  are  unique  to  the 
Smartmodem  —  e.g.,  programma- 
ble in  any  language  and  Set  com- 
mands for  customized  operation 
—  and  you'll  know  why  we  believe 
the  Smartmodem  is  everything 
you  could  ever  want  in  a  300  baud 
modem." 

The  Smartmodem  has  a  Two 
Year  Limited  Warranty.  The 
suggested  retail  price  for  the 
Hayes  Stack  Smartmodem  system 


is  $279.00.  Included  in  this  price 
are  the  Smartmodem  unit,  a 
power  pack,  one  modular  tele- 
phone cable  to  connect  the  unit  to 
the  telephone  line  and  an  owner's 
manual. 

The  Smartmodem  is  the  first 
product  in  a  new  series  that 
features  the  exclusi\'e  Hayes  Stack 
design.  This  compact  design 
permits  other  Hayei;  components 
to  be  stacked  on  top  of  the  Smart- 
modem,  thereby  eliminating 
clutter. 


TM  'I'rademark  of  Hjiyca  Microtoni|jutcr  I'roducu,  Inc. 
*  Trademark  of  American  Tdephoiic  and  Telegraph. 


New  Professional 
Appllications 
Package  For  The 
Medical  Profession 

Charles  Mann  &  Associates, 
Micro  Software  Division,  has 
announced  the  release  of  a  new 
professional  applications  package 
for  the  Medical  Profession  called 
"Medirec".  The  Medirec  system  is 
a  total  Medical  History  and 
Report  Preparation  System.  The 
professional  using  the  system  can 
prepare  office  input  forms,  enter 
patient  and  family  histories, 
record  patient  visit  symptoms, 
diagnosis,  and  treatments,  pre- 
pare referral  requests,  prepare 
patient  history  summaries,  and 
prepare  referral  reports.  The 
program  compliments  the  firm's 
existing  Medical  Billing  Package. 

Medirec  is  designed  with 
today's  professional  practice 
liability  in  mind.  The  system 
allows  the  diskette  recording  of 
up  to  550  professional  visits  per 
diskette.  Individual  patient 
records  can  be  recalled,  linked 
together  and  printed  either  in 
whole  or  in  part.  The  system 
allows  the  practitioner  to  search 
past  history  files  for  common 
symptoms,  diagnosis  or  the 
administration  of  conflicting  drug 
treatments. 


The  system  can  recall  records 
for  past  due  follow  treatment, 
prepare  reminder  notices,  pre- 
pare liability  release  forms  and 
print  file  folder  labels.  The 
system  comes  with  a  full  featured 
address  data  base  system  and  a 
programmable  form  letter  writing 
element.  The  system  can  be 
programmed  to  prepare  referral 
report  letters,  and  requests  for 
specialist  treatment. 

The  Medirec  system  requires 
a  48K  Apple  II,  Apple  II  -I- ,  or 
Apple  III,  an  80  column  printer, 
and  two  disk  drives.  A  special 
Corvus  Systems  hard  disk  version 
is  also  available  for  system  config- 
urations up  to  40MB  of  on  line 
storage. 

The  system  is  available  from 
over  700  CMA  dealers  worldwide 
for  an  introductory  price  of 
$199.95  (Corvus  version  $249.95). 
Preview  Documentation  is  availa- 
ble for  $25.00.  Additional  infor- 
mation and  dealer  location  infor- 
mation can  be  obtained  from 
Charles  Mann  &  Associates, 
Micro  Software  Division,  7594 
San  Remo  Trail,  Yucca  Valley, 
CA  92284.  Phone  (714)  365-97 18. 

NYSAEDS 
Conference 

On  October  18,  19  and  20,  1981, 
The  New  York  State  Association 
for  Educational  Data  Systems 


(NYSAEDS)  will  hold  its  annual 
conference  in  Syracuse,  NY. 
NYSAEDS,  an  affiliate  of  AEDS, 
is  composed  of  people  who  have  a 
common  interest  in  computers 
and  education. 

The  theme  of  this  year's 
conference  is  "Software".  The 
keynote  speaker  is  iVIarge  Kosel 
from  MECC  and  the  banquet 
speaker  is  Dr.  Earl  Joseph  (Futu- 
rist) from  Sperry  Rand,  A  variety 
of  workshops  will  be  held  con- 
cerning the  uses  of  microcompu- 
ter software  in  education. 

For  further  information, 
please  contact  Don  Ross,  Ardsley 
High  School,  Ardsley,  NY  10502. 


New  Power 
Line  Fliter 


Pilgrim  Electric  Company,  Plain- 
view,  New  York,  introduces  new, 
compact  "Plug-In"  .style  VOL- 
TECTOR®,  It  provides  the  most 
cost-effective  protection  against 
voltage  spikes,  surges,  transients 
and  high  frequency  interference 
for  Word-Processors,  Microcom- 
puters and  other  Microprocessor- 
based  equipment. 
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A  REMARKABLE  MAGAZINE 


David  Ahl.  Founder  and 
Publisher  ol  Creative  Computing 


You  might  think  the  term  "creative  com- 
puting" is  a  contradiction.  How  can  some- 
thing as  precise  and  logical  as  electronic 
computing  possibly  be  creative?  We  think 
it  can  be.  Consider  the  way  computers  are 
being  used  to  create  special  effects  in 
movies— image  generation,  coloring  and 
computer-driven  cameras  and  props.  Or  an 
electronic  "sketchpad"  for  your  home 
computer  that  adds  animation,  coloring 
and  shading  at  your  direction,  How  about  a 
computer  simulation  of  an  invasion  of  killer 
bees  with  you  trying  to  find  a  way  of  keep- 
ing them  under  control? 

Beyond  Our  Dreams 

Computers  are  not  creative  per  se.  But 
the  way  in  which  they  are  used  can  be 
highly  creative  and  imaginative.  Five  years 
ago  when  Creaf(Ve  Computing  magazine 
first  billed  itself  as  "The  number  1  maga- 
zine of  computer  applications  and  soft- 
ware," we  had  no  idea  how  far  that  idea 
would  take  us.  Today,  these  applications 
are  becoming  so  broad,  so  all- 
encompassing  that  the  computer  field  will 
soon  include  virtually  everything! 

In  light  of  this  generality,  we  take  "appli- 
cation" to  mean  whatever  can  be  done  with 
computers,  ought  to  be  done  with  comput- 
ers or  might  be  done  with  computers.  That 
is  the  meat  of  Creative  Computing. 

Alvin  Toffler,  auttior  of  Future  Shoc/(  and 
The  Third  Wave  says,  "1  read  Creative  Com- 
puting not  only  for  information  about  how 
to  make  the  most  of  my  own  equipment  but 
to  keep  an  eye  on  how  the  whole  field  is 
emerging. 

Creative  Computing,  the  company  as 
well  as  the  magazine,  is  uniquely  light- 
hearted  but  also  seriously  interested  in  all 
aspects  of  computing.  Ours  is  the  maga- 
zine of  software,  graphics,  games  and  sim- 
ulations for  beginners  and  relaxing  profes- 
sionals, We  try  to  present  the  new  and  im- 
portant ideas  of  the  field  in  a  way  that  a  14- 
year  old  or  a  Cobo!  programmercan  under- 


GPeattve 
computing 

"The  beat  covered  by  Creative  Computing 
is  one  of  the  most  important,  explosive  and 
fast-changing."— Alvin  Toffler 


stand  them.  Things  like  text  editing,  social 
simulations,  control  of  household  devices, 
animation  and  graphics,  and  communica- 
tions networks. 

Understandable  Yet  Challenging 

As  the  premiermagazine  forbeginners,  it 
Is  our  solemn  responsibility  to  make  what 
we  publish  comprehensible  to  the  new- 
comer. That  does  not  mean  easy,  our 
readers  like  to  be  challenged.  It  means 
providing  the  reader  who  has  no  prepar- 
ation with  every  possible  means  to  seize 
the  subject  matter  and  make  it  his  own. 

However,  we  don't  want  the  experts  in 
our  audience  to  be  bored.  So  we  try  to 
publish  articles  of  interest  to  beginners  and 
experts  at  the  same  time.  Ideally,  we  would 
like  every  piece  to  have  instructional  or 
informative  content— and  some  depth- 
even  when  communicated  humorously  or 
playfully.  Thus,  our  favorite  kind  of  piece  is 
acessible  to  the  beginner,  theoretically 
non-trivial,  interesting  on  more  than  one 
level,  and  perhaps  even  humorous. 

David  Gerrold  of  Star  Trek  fame  says, 
"Creative  Computing  with  its  unpreten- 
tious, down-to-earth  lucidity  encourages 
the  computer  user  to  have  fun.  Creative 
Computing  makes  it  possible  for  me  to 
learn  basic  programming  skills  and  use  the 
computer  better  than  any  other  source. 

Hard-hitting  Evaluations 

At  Creative  Computing  we  obtain  new 
computer  systems,  peripherals,  and  soft- 
ware as  soon  as  they  are  announced.  We 
put  them  through  their  paces  in  our  Soft- 
ware Development  Center  and  also  in  the 
environment  for  which  they  are  intended- 
home,  business,  laboratory,  or  school. 

Our  evaluations  are  unbiased  and  accur- 
ate. Wecompared  word  processing  printers 
and  found  two  losers  among  highly  pro- 
moted makes.  Conversely,  we  found  one 
computer  had  far  more  than  its  advertised 
capability.  Of  16  educational  packages. 


only  seven  offered  solid  learning  value. 

When  we  say  unbiased  reviews  we  mean 
it.  More  than  once,  our  honesty  has  cost  us 
an  advertiser— temporarily.  But  we  feel 
that  our  first  obligation  is  to  our  readers  and 
that  editorial  excellence  and  integrity  are 
our  highest  goals. 

Karl  Zinn  at  the  University  of  Michigan 
feels  we  are  meeting  these  goals  when  he 
writes.  "Creative  Computing  consistently 
provides  value  in  articles,  product  reviews 
and  systems  comparisons  ...  in  a  magazine 
that  is  fun  to  read." 

Order  Today 

To  order  your  subscription  to  Creative 
Computing,  send  $20  for  one  year  (12 
issues),  S37  for  two  years  (24  issues) or  $53 
for  three  years  (36  issues).  If  you  prefer, 
call  our  toll-free  number,  800-631-8112  (in 
NJ  201-540-0445)  to  put  your  subscription 
on  your  MasterCard,  Visa  or  American  Ex- 
press card.  Canadian  and  other  foreign 
surface  subscrjptlonsare  $29  per  year,  and 
must  be  prepaid.  We  guarantee  that  you 
will  be  completely  satisfied  or  we  will  re- 
fund the  entire  amount  of  your  subscrip- 
tion. 

Join  over  80,000  subscribers  like  Ann 
Lewin,  Director  of  the  Capital  Children's 
Museum  who  says,  "I  am  very  much  im- 
pressed with  Creative  Computing.  It  is 
helping  to  demystify  the  computer.  Its  arti- 
cles are  helpful,  humorous  and  humane. 
The  world  needs  Creative  Computing." 

GPeative 
Gomp»tiRg 

Attn:  Barbie 

P.O.  Box789-M 

Morristown,  NJ  07960 

Toll-free  800-631-8112 

(In  NJ  201-540-0445) 
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The  unique  heavy  duty 
design  meets  the  latest  industry 
Surge  Voltage  Standards  and 
provides  the  highest  level  of 
commercially  available  two-way 
protection.  It  assures  electronic 
equipment  of  clean  incoming  AC 
power  ...  and  it  prevents  distur- 
bances generated  by  equipment 
from  being  conducted  back  into 
the  power  line.  The  VOLTEC- 
TOR®  Series  6  Plug-In  Pcnver 
Conditioner  supplies  the  positive 
surge-protection  and  filtering 
that  most  manufacturers  have  left 
out  of  their  equipment. 

Available  with  current  ratings 
of  I,  2,  5.  7  and  10  amps. 

Prices:  Begin  at  $79.50 
Delivery:  Stock 

Manhattan 
Software 
Announces  Four 
Atari  Game 
Programs 

Manhattan  Software,  long  a 
publisher  of  programs  for  the 
TRS-80,  has  begun  issuing  a 
series  of  programs  for  the  Atari 
Computer.  The  f u'st  four  releases 
are: 

Gin  Rummy  3.0,  with  color  card 
graphics  and  sound,  which  plays  a 
full  regulation  game  of  Gin,  and 
can  hold  its  own  against  even 
skilled  Gin  players.  Prices  at 
$19.95,  the  program  requires 
32K  memory  and  one  joystick. 

Casino  Biackjack/Counter,  a 

realistic  simulation  of  playing  at  a 
casino  table  —  card  graphics  show 
Five  hands  dealt,  and  the  user 
plays  the  center  hand  while  the 
computer  plays  the  rest.  A  major 
purpose  of  the  program  is  to 
teach  card-counting,  a  method 
which  is  claimed  to  give  the  player 
a  statistical  advantage  over  the 
house  in  some  situations.  Priced 
at  $19.95.  for  24K  and  one 
joystick. 

Labyrintli  Run,  a  test  of  skill  and 
coordination,  using  the  joystick  to 


guide  a  fast-moving  runner 
through  twists,  turns,  reverses 
and  slaloms,  with  thunderous 
crashes  when  the  runner  hits  a 
wall.  Three  skill  levels.  $14.95, 
the  game  requires  two  joysticks. 

These  programs  are  available 
at  dealers,  and  direct  from  Man- 
hattan Software,  P.O.  Box  35, 
Pacific  Pali.sades,  CA  90272. 
Telephone  (213)  454-8290. 


Atari  Adds  i^issile 
Command  To  Its 
Video  Computer 
System  Game 
Library 

Missile  Command™,  a  popular 
coin  operated  video  game  cur- 
rently in  arcades,  is  now  available 
in  a  home  video  game  version,  it 
was  announced  today  by  Atari, 
Inc.,  creator  and  manufacturer  of 
both  products. 

Largely  due  to  Missile  Com- 
mand's success  as  an  arcade  game 
and  in  response  to  considerable 
consumer  demand.  Atari  de- 
signed the  game  cartridge  for  its 
Video  Computer  System™  pro- 
grammable TV  game. 

The  Missile  Command  game 
cartridge  is  a  one  or  two  player 
game  that  uses  joysticks  and 
offers  34  game  variations. 

According  to  Michael  J. 
Moone,  president  of  the  Consu- 
mer Electronics  Division,  "Missile 
Command  is  one  of  the  most 
challenging  skill  and  action  video 
games  ever  created.  We  believe  its 
popularity  will  be  as  pervasive  as 
that  of  its  predecessors.  Space 
Invaders  and  Asteroids." 

The  game  begins  with  wave 
after  wave  of  enemy  missiles 
raining  down  on  an  earth  missile 
base  and  6  surrounding  cities. 
The  player,  as  base  commander, 
is  responsible  for  protecting  and 
defending  the  territory  from 
enemy  attack.  To  combat  each 
wave  of  enemy  missiles,  the  base 
commander  is  given  30  guided 


defense  missiles  which  when 
exploded  in  the  path  of  attacking 
missiles  destroys  them.  Each 
successive  wave  of  attacking 
missiles  comes  faster  than  the 
previous  one  and  the  game 
continues  until  all  cities  and  the 
missile  base  are  lost. 

Additional  features  include 
game  difficulty  adju.stment  to 
correspond  to  player  skill  levels, 
slow  game  variations  designed  for 
young  children  and  screen  color 
changes  as  game  progresses  to 
reduce  eyestrain  during  extended 
game  play. 

Suggested  retail  price  is 
$3 1 .95  and  cartridges  will  be 
available  nationwide  by  April. 


New  Product  releases  are 
selected  from  submissions  for 
reasons  of  timeliness,  available 
space,  and  general  interest  to 
our  readers.   We  regret  that  we 
are  unable  to  select  all  new 
product  submissions  for 
publication.  Readers  should  be 
aware  that  we  present  here  some 
edited  version  of  material 
submitted  by  vendors  and  are 
unable  to  vouch  for  its  accuracy 
at  time  of  publication. 
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Big  Savings  On  Atari  &  PET! 


No  Risk  -  No  Deposit  On  Phone 
Orders  -  Shipped  Same  Day  You 
Call  -  C.O.D.   or  Credit  Card 

•  On  sll  in  stock  units 


Please  Call  Between  11  AM  &  6PM 
(Eastern  Standard  Time) 


(800)  233-8950 


ATARI®  800"" 
PERSONAL  COMPUTER 

List  $1080 
$759 


A" 

ATARI 


ATARI®  810^:; 
DISC 

DRIVE  mm 

List  $599.95 
New  Low  Price 

only  $489.00 


Maxell  Disks 1 0  for  S34 

Sycom  Disks 10  for    29 

Atari  Disks 5  for    22 


400  BK 

400  16K 

410  Recorder 

815  Disk 

822  Printer 

825  Printer 

830  Modem 

850  Interface  Module 

CX852  8K  RAM 

CX853  16K  RAM 

CX70  Light  Pen 

CX30  Paddle  

CX40  Joystick 

CX86  Printer  Cable 

C0 16345  822  Tfiermal 

Printer  Paper 

CAO16087  825  80-col. 

Printer  Ribbon 

(3/bojc| 

CX41 19  Conversational  Frencti 

CX41 18  Conversational  German 

CX4 1 20  Conversational  Spanisfi 

CX4125  Conversational  Italian 

GXL4009  Ctiess 

CXL401 1  Star  Raiders"  

CXL4004  Basketball 

CXL4006  Super  Breakout'" 

CXL401 0  3-D  Tic-Tac-Toe 

CXL4005  Video  Easel" 

CXL4007  Music  Composer 

CXL4015TeleLink" 

CXL4002  BASICComputing  Language 
CXL4001  Education  System 

Master 

CXL4003  Assembler  Editor 


S419 

449 

62 

1199 

359 

779 

159 

179 

94 

149 

64 

18 

18 

42 


17 
45 
45 
45 
45 
30 
45 
30 
30 
30 
30 
45 
20 
46 


21 
45 


CX41 15  Mortgage  S  Loan  Analysis $13 

0X4101  AnlnvitationtoProgrammingl  ...  17 

CX4106An  Invitation  to  Programmtng2. ..  20 

CX41 17AnlnvitationtoProgramming3. ..  20 

CX4107  Biorfiytfim 13 

CX4103  Statistics  I 17 

CX41  21  Energy  Czar 13 

CX4108  Hangman 13 

CX4102  Kingdom 13 

CX41 1 2  States  S  Capitals 13 

CX41 14  European  Countries 

SCaptials 13 

CX41 05  Blackjack 13 

CX4111  Space  Invaders 18 

CX8106  Bond  Analysis 20 

0X8107  Stock  Analysis 20 

0X8108  Stock  Ctianing 20 

0X4104  Mailing  List 17 

0X41 10  Touch  Typing 20 

CXei 02  Calculator 24 

0X4109  Graph  It 17 

0X4120  Conversational  Spanish 45 

Talk  &  Teach  Courseware; 

0X6001  thru  CX601 7 23 

Combination  Special! 
825  Printer*  850  Interface 

825  Lists  for  SI  000 

Regular  Mail  Order  Price:  $779 
850  Lists  for  S220. 

Regular  Mail  Order  Price:  $179 

Save  $20.00 
Buy  Both  For  Only  $938 


CX8104  Atari  810 
Master  Diskette  II 

New  DOS  2  Operating 
System  Master 

only  $21 .00 

Microtek  RAM  1 6Kor32K 

•  Full  1  year  warranty 

•  Compatible  with  400  or  800 

•  Assembled  and  Tested 


16K. 
32K. 


.$   99 
.     189 


Atari  Specialists . . 

We  Carry 
It  All 


comtnodore 

\^  Commodore  Computers: 

4032  N  SI  090 

4032  B 1 090 

8032  1499 

Commodore  Peripherals: 

CBM  4022  Printer 675 

CBM  4040  Dual  Drive  Floppy  Disk  ...  1 090 
OBM  8050  Dual  Drive  Floppy  Disk  . , .  1420 

CBM  C2N  Cassette  Drive 87 

Tally  8024  Printer 1 679 


EBS  Accounts  Receivable 

Inventory  System $695 

Dr.  Daley  Mailing  List    129 

Dr.  Daley  Inventory   89 

022  Information  System 329 

BPI  General  Ledger 329 

Tax  Package 399 

Dow  Jones  Portfolio  Management 1 29 

Pascal 239 

PET  to  IEEE  Cat>le 37 

IEEE  to  IEEE  Cable 46 

NEW- 

8096 1890 

VIC -20  299 


Software 


WordPro  3  (40  col,|  SI 86 

WordPro  4  (80  COl.|   279 

WordPro  4  Plus  (80  col.) 339 

Visicalc  •  Apple SI  22 

Atari 163 

PET 163 


Printers 


NEC  5530 $2495 

Diablo  630 2195 

Trendcom  1 00 299 

Trendcom  200 489 

Paper  Tiger  445G 769 

Paper  Tiger  460G 1219 

Epson  MX-80  539 


To  Order: 

Phone  orders  invited  (800  number  is  for  order  desk  only).  Or  send  check  or  money  order. 
Equipment  Shipped  UPS  collect.  Pennsylvania  residents  add  6%  sales  tax.  Add  3%  for 
Visa  or  MO.  Eciuipment  is  subject  to  price  change  and  availability  without  notice 


Computer  Mail  Order 
501  E.  Third  St. 
Williamsport,  PA  17701 
(717)  323-7921 
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My  computer  It: 

D  PIT  D  APPLE  □  ATARI  D  OSI 

D  KIM  a  SYM  D  AIM  D  OTHER 

D  Don't  yet  have  one... 

During  the  next  year  I  expect  to  buy: 

D  computer  D  printer 

D  ditk  drive  D  other  peripheral* 

D  Please  enter  my  1  year  (12  issue)  subscription  to  COMPUTE! 
D  New  subscription  D  Renewoi  subscription 

D$2000  US  subscription 

D  $25 OO Conada and  international  surface nnaii  Poymeni  in  US  funds,  drown 

on  U.S  bonk  or  money  order 
G  Bill  me  (US  only)  Sl.OO  billing  fee. 

Name,  Address;  


Charge  my:    D  Visa  D  MC 

Number Expires. 

5  a  7  8  9  10  n  )2 


The  Editor's  Feedback: 

My  computer  Is: 

D  PET  D  APPLE  D  ATARI  D  OSI 

n  KIM  D  SYM  n  AIM  D  OTHER 

D  Dont  yet  have  one... 

During  the  next  year  I  expect  to  buy: 

O  computer  ij  printer 

D  disk  drive  D  other  peripherals 

Content 

Best  Article  This  Issue  (page  *.  title) 


Other  suggestions: 
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My  computer  It: 

n  PET  D  APPLE  D  ATARI  D  OSI 

D  KIM  D  SYM  D  AIM  D  OTHER 

G  Don't  yet  have  one... 

During  the  next  year  I  expect  to  buy: 

D  computer  □  printer 

D  dItk  drive  □  other  peripherals 

D  Piease  enter  my  1  year  (12  issue)  subscription  to  COMPUTE! 
n  New  subscription  n  Renewal  subscription 

nS2000U.S  subscription 

D  S25.00  Canado  ond  internofional  surfoce  moil;  ^'ayment  in  U.S  funds,  drown 

on  U  S.  bonk  or  money  order 
D  Bill  me  (US  only)  SI  CQ  billing  fee 

Name,  Address: 


Charge  my:     D  Visa  D  MC 

Number Expires. 
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N^rr  A  MIKUTE, 
WE  CAK  iJ^E 
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With  the  Starwrtter™  Doisy 
Wheel  25  cps  printer  from  C.  itoh. 

A  business  letter,  written  on  a  45  cps 
word-processing  printer,  might  take 
about  two  minutes  to  print. 

With  the  Starwriter,  it  might  take 
closer  to  three. 

The  typical  45  cps  printer  retails  for 
about  $3,000. 

But  the  Starwriter  25  retails  for  about 
$1,895— thus  saving  you  about  $1,000. 

And  therein  lies  the  biggest  difference 
between  the  Starwriter  25  and  the  more 
expensive,  daisy  wheel  printers. 

The  Starwriter  25  comes  complete 
and  ready-to-use,  requiring  no  changes 
in  hardware  or  software.  It  uses  indus- 
try-standard ribbon  cartridges,  and  it's 
"plug-in"  compatible  to  interface  with  a 


wide  variety  of  systems,  to  help  lower 
system-integration  costs. 

Using  a  96-character  wheel,  it 
produces  excellent  letter-quality  print- 
ing on  three  sharp  copies  with  up  to  163 
columns,  and  offers  the  most  precise 
character-placement  available,  for  out- 
standing print  performance. 

C.  Itoh's  worrcinty; 

3  months  on  parts  and  labor,  sup- 
ported by  one  of  the  best  service  organi- 
zations in  the  industry. 


*iOOOOFF 

Leading  Edge  Products,  Inc.,  CM-5 
225  Turnpike  Street, 
Canton,  Massachusetts  02021 

Dear  Leading  Edgt: 

I'd  like  lo  know  more  about  the  Siarvriter,  and 
how  spending  a  miinile  can  save  ine  a  grand. 
I'lease  send  mt-  [he  ti;ime  of  my  iie;irest  dealer. 


Name 

Title 

C!ompaiiy_ 

Street 

Ciiv 

.State 


.Zip. 


I'hone;  .'Xrea  Code. 
Number 


LEADING 
EDGE. 


Leading  Edge  Products,  Inc.,  22.">  Tiiriipike  Street,  Canton.  Massachusetts  020^1 

Dealers'    For  immediate  deliverv  from  the  Leading  Edge  Inventory  Bank"  call  loll  free  1-800-343-6833 

In  Massachusetts,  call  collect  (617)  828-8150.  Telex  951-624 
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American  Solutioii 

Machine. 


Meet  Commodore.  The  busi- 
ness computer  that's  providing 
solutionij  for  more  than  100,000 
people  all  over  the  world.  Built 
by  one  of  the  pioneers  in  office 
machines.  With  a  reputation  for 
quality  that  can  only  come  from 
vertical  integration  of  the  total 
manufacturing  process.  Commo- 
dore builds,  not  assembles. 

Compare  Commodore's  word 
and  data  processing  capabilities 
with  computers  costing  twice  or 
even  three  times  as  much.  You'll 
see  why  so  many  small  busi- 
nesses are  turning  to  Commodore 
for  solutions  to  problems  as  var- 
ied as  these: 

n  A  car  leasing  company's  cus- 
tomers were  terminating  too  early 
for  account  profitability.  Solu- 
tion: A  16K  Commodore.  It 
analyzes  cash  flow  on  over  1200 
accounts,  identifies  those  for 
early  penalties,  and  even  writes 
up  lease  contracts.  Commodore 
paid  for  itself  within  weeks. 
□  A  law  firm  needed  a  high 
quality,  eiasy-to-use,  affordable 
word  processing  system. 
Solution;  Commodore  plus 
its  WordPro  software  pack- 


age. At  a  $6,000  savings. 
n  A  gasoline  retailer  needed  to 
inventory,  order  and  set  prices; 
determine  Federal  and  state 
income  taxes;  and  comply  with 
Federal  pricing  and  allocation 
regulations.  All  done  daily, 
weekly,  monthly  and  yearly. 
Solution;  Commodore.  It  keeps 
his  business  on  track— and  Uncle 
Sam  off  his  back, 
3  A  paint  and  wallpaper  store 
had  to  inventory  over  600  expen- 
sive wallpaper  lines  for 
profitability,  monitor  distributor 
sales,  set  and  track  salesmen's 
goals,  and  help  the  customer 
select  the  right  size,  pattern  and 
quantity.  Solution:  Two  32K 

Commodore  com- 
puters, floppy 
disk  and 
printer. 
Commodore 
does  it  all — 
and  account- 
ing, too. 

In  applica- 
tions like 


and  many  more.  Commodore 
solves  the  problems  that  stand  in 
the  way  of  increased  jirofitability. 
Commodore  can  provide  the  solu- 
tion in  your  Great  American  bus- 
iness, too.  Find  out  more  by  call- 
ing or  writing  any  of  Commo- 
dore's District  Sales  Offices. 
COSTA  MESA,  CA  2?55  N.  Air- 
way Avenue  92626.  (714)  979-6307. 
SANTA  CLARA,  CAJSBO  Scott 
Boulevard  95051.  (408)  727-1130 
DECATUR,  GA  5360  Snapfinger 
Woods  Drive  30035.  (404)  987-3311 
BENSENVILLE,  IL  790  Maple 
Lane  60106.  (312)  595-5990. 
NORRISTOWN,  PA 
950  Rittenhouse  Road  19401 
(215)  666-7950. 

DALLAS,  TX  4350  BeJtwood 
Parkway  South  75234. 
(214)  387-0006. 

Commodore  Business  Machines, 
Inc.,  Computer  Sales  Division, 
Valley  Forge  Corporate  Center. 
950  Ritten- 
house Road, 


